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NIST  Express  Working  Form 
Programmer’s  Reference 

Stephen  Nowland  Clark 
Don  Libes^ 


1 Introduction 

The  NIST  Express  Working  Form  [Clark90b],  with  its  associated  Express  parser, 
Fed-X,  is  a Public  Domain  set  of  software  tools  for  manipulating  information  models 
written  in  the  Express  language  [Parti  1].  The  Express  Working  Form  (WF)  is  part  of 
the  NIST  PDFS  Toolkit  [Clark90a].  This  reference  manual  discusses  the  internals  of 
the  Working  Form,  including  the  Fed-X  parser.  The  information  presented  will  be  of 
use  to  programmers  who  wish  to  write  applications  based  on  the  Working  Form,  includ- 
ing output  modules  for  Fed-X,  as  well  as  those  who  will  maintain  or  modify  the  Work- 
ing form  or  Fed-X.  The  reader  is  assumed  to  be  familiar  with  the  design  of  the  Working 
Form,  as  presented  in  [Clark90b]. 

1.1  Context 

The  PDFS  (Product  Data  Exchange  using  STEP)  activity  is  the  United  States’  effort  in 
support  of  the  Standard  for  the  Exchange  of  Product  Model  Data  (STEP),  an  emerging 
international  standard  for  the  interchange  of  product  data  between  various  vendors’ 
CAD/CAM  systems  and  other  manufacturing-related  software  [Mason91].  A National 
PDFS  Testbed  has  been  established  at  the  National  Institute  of  Standards  and  Technol- 
ogy to  provide  testing  and  validation  facilities  for  the  emerging  standard.  The  Testbed 
is  funded  by  the  Computer-aided  Acquisition  and  Logistic  Support  (CALS)  program  of 
the  Office  of  the  Secretary  of  Defense.  As  part  of  the  testing  effort,  NIST  is  charged 
with  providing  a software  toolkit  for  manipulating  STEP  data.  This  NIST  PDFS  Tool- 
kit is  an  evolving,  research-oriented  set  of  software  tools.  This  document  is  one  of  a set 
of  reports  which  describe  various  aspects  of  the  Toolkit.  An  overview  of  the  Toolkit  is 
provided  in  [Clark90a],  along  with  references  to  the  other  documents  in  the  set. 


1.  Don  Libes  is  responsible  for  the  minor  changes  made  to  this  document  to  track  the  actual  implementation 
of  the  software  described.  However,  credit  for  the  bulk  of  the  document,  its  style,  and  the  implementation  of 
the  NIST  Express  Working  Form  remains  with  Stephen  Nowland  Clark.  Recent  changes  are  denoted  by  a 
change  bar  to  the  left  of  the  text. 
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Fed-X  Control  Flow 


A Fed-X  translator  consists  of  three  separate  passes:  parsing,  reference  resolution,  and 
output  generation.  The  first  two  passes  can  be  thought  of  as  a single  unit  which  pro- 
duces an  instantiated  Working  Form  (WF).  This  Working  Form  can  be  traversed  by  an 
output  module  in  the  third  pass.  It  is  anticipated  that  users  will  need  output  formats  oth- 
er than  those  provided  with  the  NIST  Toolkit.  The  process  of  writing  a report  generator 
for  a new  output  format  is  discussed  in  detail  in  section  4. 

2.1  First  Pass;  Parsing 

The  first  pass  of  Fed-X  is  a fairly  straightforward  parser,  written  using  the  Unix^M  pars- 
er generation  languages,  Yacc  and  Lex.  As  each  construct  is  parsed,  it  is  added  to  the 
Working  Form.  No  attempt  is  made  to  resolve  symbol  references:  they  are  represented 
by  instances  of  the  type  Symbol  (see  below),  which  are  replaced  in  the  second  pass 
with  the  referenced  objects. 

The  grammar  used  by  Fed-X  is  processed  by  Yacc  or  Bison  (a  Yacc  clone  available 
from  the  Free  Software  Foundation^).  The  lexical  analyzer  is  processed  by  Lex  or 

Flex  , a fast,  public  domain  implementation  of  Lex.  Generally,  Flex  and  Bison  are  fast- 
er and  provide  more  features.  For  portability,  some  of  these  features  are  avoided  by 
Fed-X  even  though  such  use  might  make  the  result  simpler  and  faster  (such  as  the  mul- 
tiple start  condition  machinary  offered  by  Flex).  When  easily  handled  (such  as  by  con- 
ditional compilation  (#  if  def  . . #endif  pairs)),  certain  features  of  Flex  and  Bison 
are  taken  advantage  of.  In  general.  Flex  and  Bison  are  prefered  over  Lex  and  Yacc.  The 
choice  is  controlled  by  the  Makefile  (and  make_rules)  that  directs  the  building  of  the 
system. 

2.2  Second  Pass:  Reference  Resolution 

The  reference  resolution  pass  of  Fed-X  walks  through  the  Working  Form  built  by  the 
parser  and  attempts  to  replace  each  Symbol  with  the  object  to  which  it  refers.  The 
name  of  each  symbol  is  looked  up  in  the  scope  which  is  in  effect  at  the  point  of  refer- 
ence. If  a definition  for  the  name  is  found  which  makes  sense  in  the  current  context, 
the  definition  replaces  the  symbol  reference.  Otherwise,  Fed-X  prints  an  error  message 
and  proceeds. 

In  some  cases,  the  changes  which  must  be  made  when  a symbol  is  resolved  are  slightly 
more  drastic.  For  example,  the  syntax  of  Express  does  not  distinguish  between  an  iden- 
tifier and  an  invocation  of  a function  of  no  arguments.  When  a token  could  be  inter- 


1 . The  Free  Software  Foundation  (FSF)  of  Cambridge,  Massachusetts  is  responsible  for  the  GNU  Project, 
whose  ultimate  goal  is  to  provide  a free  implementation  of  the  UNIX  operating  system  and  environment. 
These  tools  are  not  in  the  public  domain:  FSF  retains  ownership  and  copyright  priviledges,  but  grants  free 
distribution  rights  under  certain  terms.  At  this  writing,  further  information  is  available  via  electronic  mail  on 
the  Internet  from  gnu@prep.ai.mit.edu. 

2.  Vem  Paxson’s  Flex  is  usually  distributed  with  GNU  software,  although,  being  in  the  public  domain,  it  does 
not  come  under  the  FSF  licensing  restrictions. 
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preted  as  either,  the  parser  always  assumes  that  it  is  a simple  identifier.  When  the 
second  pass  determines  that  one  of  these  objects  actually  refers  to  a function,  the 
Identifier  expression  is  replaced  by  an  appropriate  Function_Call  expres- 
sion. 

Thus,  the  result  of  the  second  pass  (in  the  absence  of  any  errors)  is  a tightly  linked  set 
of  structures  in  which,  for  example,  Function_Call  expressions  reference  the 
called  Algorithms  directly.  At  this  point,  it  is  possible  to  traverse  the  data  structures 
without  resorting  to  any  further  symbol  table  lookups.  The  scopes  in  the  Working  Form 
are  only  needed  to  resolve  external  references  - e.g.,  from  a STEP  physical  file. 

2.3  Third  Pass;  Output  Generation 

The  report  or  output  generation  pass  manages  the  production  of  the  various  output  files. 
Control  is  essentially  handed  over  to  the  application-programmer-supphed  output  mod- 
ule loaded  at  build  time. 

In  theory,  the  module  could  do  anything,  but  more  typically,  the  output  module  trans- 
lates the  Working  Form  into  some  other  form  such  as  a human-readable  report,  or  input 
to  an  SQL  database. 

A report  generator  is  an  object  module,  most  likely  written  in  C,  which  has  been  com- 
piled as  a component  module  for  a larger  program  (i.e.,  with  the  -c  option  to  a UNIX 
C compiler).  The  code  of  this  module  consists  of  calls  to  Express  Working  Form  ac- 
cess functions  and  to  standard  output  routines.  A detailed  description  of  the  creation  of 
a new  output  module  appears  in  section  4. 

3 Working  Form  Implementation 

The  Express  Working  Form  data  abstractions  are  implemented  in  Standard  C 
[ANSI89].  Standard  C is  not  essential  to  Fed-X,  and  some  effort  has  been  taken  to 
make  the  source  Classic  C compatible  but  this  work  is  not  complete.  Application  mod- 
ules (i.e.,  output  modules)  can  be  written  in  either  Standard  C or  Classic  C. 

Each  abstraction  is  implemented  as  one  or  more  classes,  using  the  Class/Object 
modules  in  libmisc  [Clark90c].  The  data  specific  to  a particular  class  is  encapsulat- 
ed in  a private  C struct.  This  structure  is  never  manipulated  directly  outside  of  the 
abstraction’s  module.  For  example: 

/*  the  actual  contents  of  a Foo  */ 
struct  Foo  { 
int  i ; 
double  d; 

}; 

typedef  Object  Foo; 

/*  Class_Foo  is  created  in  FOOinitialize ( ) */ 
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Class  Class_Foo; 


Outside  of  Foo’s  module,  we  will  never  see  a struct  Foo.  We  will  only  see  a Foo, 
which  is  actually  an  Obj  ect  which  ultimately  points  atastruct  Foo. 

3.1  Primitive  Types 

The  Express  Working  Form  makes  use  of  several  modules  from  the  Toolkit  general  li- 
braries, including  the  Class,  Object,  Error,  Linked_List,  and  Dictionary  modules. 
These  are  described  in  [Clark90c].  The  underlying  representation  for  all  of  the  Work- 
ing Form  abstractions  makes  use  of  the  Class  and  Object  modules. 

3.2  Symbol  and  Construct 

All  Working  Form  objects  are  subclassed  from  the  types  Symbol  and  Construct. 
After  the  working  form  has  been  built,  these  types  become,  in  Object-Oriented  termi- 
nology, abstract  supertypes^  for  the  various  types  in  the  Working  Form.  The  two  are 
quite  similar,  both  in  concept  and  in  implementation.  Both  have  an  attribute  containing 
the  line  number  on  which  the  represented  construct  appears  in  the  source  file  (probably 
useful  only  within  Fed-X).  A Symbol  also  includes  a name  and  a flag  indicating 
whether  the  symbol  has  been  resolved. 

Abstractions  which  represent  nameable  objects  are  subclassed  from  Symbol.  These 
include  Constant,  Type,  Variable,  Algorithm,  Entity,  and  Schema.  The 
latter  three  are  actually  subclasses  of  another  Symbol  subclass.  Scope.  Other  ab- 
stractions (Case_Item,  Expression,  Loop_Control,  and  Statement)  are 
subclassed  from  Construct. 

3.3  Express  Working  Form  Manager  Module 

In  addition  to  the  abstractions  discussed  in  [Clark90b],  libexpress  . a contains  one 
more  module,  the  package  manager.  Defined  in  express  . c and  express  . h,  this 
module  includes  calls  to  intialize  the  entire  Express  Working  Form  package,  and  to  run 
each  of  the  passes  of  a Fed-X  translator. 

3.4  Code  Organization  and  Conventions 

Each  abstraction  is  implemented  as  a separate  module.  Modules  share  only  their  inter- 
face specifications  with  other  modules.  There  is  one  exception  to  this  rule:  In  order  to 
avoid  logistical  problems  compiling  circular  type  definitions  across  modules,  an  Ex- 
press Working  Form  module  includes  any  other  Working  Form  modules  it  uses  after 
defining  its  own  private  struct.  Thus,  the  types  defined  by  these  other  modules  are 
not  yet  known  at  the  time  an  abstraction’s  private  struct  is  defined,  and  references 
to  these  other  Working  Form  types  must  assume  knowledge  of  their  implementations. 
This  is,  in  fact,  not  a serious  limitation:  Each  Working  Form  types  is  implemented  as 
an  Obj  ect,  which  is  defined  when  the  struct  is  compiled. 


1.  During  the  generation  of  the  Working  Form,  many  Symbols  are  not  abstract  supertypes. 
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A module  Foo  is  composed  of  two  C source  files,  f oo . c and  f oo  . h.  The  former  con- 
tains the  body  of  the  module,  including  all  non-inlined  functions.  The  latter  contains 
function  prototypes  for  the  module,  as  well  as  all  type  and  macro  definitions.  In  addi- 
tion, global  variables  are  defined  here,  using  a mechanism  which  allows  the  same  dec- 
larations to  be  used  both  for  extern  declarations  in  other  modules  and  the  actual 
storage  definition  in  the  declaring  module.  These  globals  can  also  be  given  constant 
initializers.  Finally,  f oo  . h contains  inline  function  definitions.  In  a compiler  which 
supports  inline  functions,  these  are  declared  static  inline  in  every  module  which 
# includes  foo . h,  including  f oo . c itself.  In  other  compilers,  they  are  undefined 
except  when  included  in  f oo . c,  when  they  are  compiled  as  ordinary  functions. 

The  type  defined  by  module  Foo  is  named  Foo,  and  its  private  structure  is  struct 
Foo.  Access  functions  are  named  as  FOOf  unction  ( ) ; this  function  prefix  is  abbre- 
viated for  longer  abstraction  names,  so  that  access  functions  for  type 
Foolhardy_Bar tender  might  be  of  the  form  FOO_BAR function  ( ) . Some 
functions  may  be  implemented  as  macros;  these  macros  are  not  distinguished  typo- 
graphically fi*om  other  functions,  and  are  guaranteed  not  to  have  unpleasant  side  effects 
like  evaluating  arguments  more  than  once.  These  macros  are  thus  virtually  indistin- 
guishable from  functions.  Functions  which  are  intended  for  internal  use  only  are  named 
FOO_f  unction  ( ) , and  are  usually  static  as  well,  unless  this  is  not  possible.  Glo- 
bal variables  are  often  named  FOO_variable;  most  enumeration  identifiers  and  con- 
stants are  named  FOO_CONSTANT  (although  these  latter  two  rules  are  by  no  means 
universal).  For  example,  every  abstraction  defines  a constant  FOO_NULL,  which  rep- 
resents an  empty  or  missing  value  of  the  t5^e. 

If  an  instance  of  Foo  might  contain  unresolved  Symbols,  then  there  is  a function 
FOOresolve  (...),  called  during  Fed-X’s  second  pass,  which  attempts  to  resolve 
all  such  references  and  reports  any  errors  found.  This  call  may  or  may  not  require  a 
Scope  as  a parameter,  depending  on  the  abstraction.  For  example,  an  Algorithm 
defines  its  own  local  Scope,  ft'om  which  the  next  outer  Scope  (in  which  the 
Algorithm  is  defined)  can  be  determined;  ALGresolve  ( ) thus  requires  no  Scope 
parameter.  A Type,  on  the  other  hand,  has  no  way  of  getting  at  its  Scope,  so 
TYPEresolve  ( ) requires  a second  parameter  indicating  the  Scope  in  which  the 
Type  is  to  be  resolved. 

3.5  Memory  Management  and  Garbage  Collection 

In  reading  various  portions  of  the  Express  Working  Form  documentation,  one  may  get 
the  impression  that  the  Working  Form  does  some  reasonably  intelligent  memory  man- 
agement. This  is  not  entirely  true.  The  NIST  PDES  Toolkit  is  primarily  a research  tool. 
This  is  especially  true  of  the  Express  and  STEP  Working  Forms.  The  Working  Forms 
allocate  huge  chunks  of  memory  without  batting  an  eye,  and  often  this  memory  is  not 
released  until  an  application  exits.  Hooks  for  doing  memory  management  do  exist  (e.g., 
OBJ f r ee  ( ) and  reference  counts),  and  some  attempt  is  made  to  observe  them,  but  this 
is  not  given  high  priority  in  the  current  implementation. 
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3.6 


Default  Print  Routines 


The  library  provides  default  print  routines.  This  is  oriented  towards  producing  human- 
readable  text  and  can  be  overridden  by  defining  a new  subroutine  by  the  same  name. 
However,  as  is,  it  provides  a reasonable  means  of  interactively  browsing  through  the 
Working  Form,  especially  if  the  Working  Form  is  ’broken’,  such  as  when  Fed-X  itself 
is  being  debugged. 

The  following  discussion  assumes  you  are  printing  a Fed-X  object  from  within  gdb,  the 
GNU  debugger. 

Every  class  has  a 'print'  function 

3.6.1  Printing  Unknown  Objects 

Thus,  to  print  out  an  object,  say: 

p OBJprint (obj ) 

This  is  useful  if  you  have  no  idea  what  the  object  is. 

3.6.2  Printing  Known  Objects  or  Specific  Classes  of  Objects 

If  you  know  'obj'  is  a scope  (or  is  a subclass  of  scope),  you  can  also  just  say: 
p SCOPEprint (obj ) 

For  example,  you  can  print  out  just  the  scope  of  an  entity  as: 

p SCOPEprint ( entity ) 

Alternatively,  if  you  already  have  a handle  to  the  hidden  structure,  you  can  directly  print 
it  out  as: 

p SCOPE_print ( scope) 

(You  can  not  print  out  the  scope  of  an  entity  this  way,  since  the  hidden  forms  do  not 
inherit  anything  by  themselves.) 

Dataless  classes  may  not  necessarily  have  a print  function,  but  can  use  print  functions 
defined  for  classes  that  have  private  data. 

3.6.3  Printing  Specific  Object  Attributes 

Each  class  has  a special  variable  called  'X_print'  (for  example  'scope_print') 
which  determines  which  attributes  of  the  scope  are  printed.  For  example,  if  you  want 
scope  references  to  be  printed,  do: 

set  scope_print . ref erences  = 1 
set  scope_print . self  = 1 
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Element  'self  is  0 (no  attributes),  1 (some),  or  2 (all).  By  default,  it  is  set  to  1 for  linked 
lists,  dictionaries  and  symbols,  and  0 for  all  other  classes.  By  default,  all  other  elements 
are  set  to  1 (which  means  print,  0 means  don't  print).  If  'self  is  0,  it  is  forced  to  1 when 
printed  by  its  high  level  print  function.  (In  other  words,  SCOPEprint  (object)  will 
force  the  scope  to  be  printed,  while  OBJprint  (obj  ect ) will  print  only  if 
scope_print  says  to.) 

Except  for  the  'self  element,  element  names  are  exactly  the  same  names  as  the  names 
used  in  the  hidden  types.  Classes  that  have  only  one  attribute  use  a common  print  struc- 
ture type  with  only  a 'self  element.) 

For  convenience,  the  prefix  of  the  print  structure  (i.e.,  'scope'  in  'scope_print'  is 
the  same  as  the  prefix  used  in  the  low-level  functions  (e.g.,  'aggr_lit_print'  is 
used  rather  'aggregate_literal_print'). 

3.6.4  Global  Printing  Options 

The  structure  'Print'  provides  some  additional  control.  Attributes  are  as  follows: 

'header'  controls  whether  header  information  such  as  class  names  are  printed.  By  de- 
fault, header  is  1 meaning  only  the  most  specific  class  is  described.  0 disables  class  de- 
scriptions, while  2 forces  all  class  descriptions  to  be  printed.  Class  specific  data  is 
printed  after  each  class  header. 

'depth_max'  controls  the  depth  of  object  recursion.  By  default,  the  depth  is  2. 

'debug'  controls  whether  internal  functioning  of  the  print  routines  themselves  are  print- 
ed. This  is  only  useful  if  you  have  some  doubts  about  the  correct  functioning  of  the 
print  routines.  Incorrect  function  has  always  turned  out  to  be  the  case  of  something  else 
having  sabotaged  the  environment,  so  this  'debug'  element  is  more  useful  for  reassuring 
yourself  that  the  environment  (stack,  heap,  whatever)  has  not  been  corrupted. 

Other  elements  in  'Print'  are  of  value  only  to  the  implementation. 

3.6.5  Printing  to  a File 

By  default,  output  is  printed  to  the  standard  output.  To  redirect  this  to  a file,  say: 
p OBJprint_f ile ( " f oo " ) 

To  redirect  back  to  the  standard  output  and  close  the  current  output  file: 

p OBJprint_f ile (( char  *)0) 

4 Writing  An  Output  Module 

It  is  expected  that  a common  use  of  the  Express  WF  will  be  to  build  Express  translators. 
The  Fed-X  control  flow  was  designed  with  this  application  in  mind.  A programmer 
who  wishes  to  build  such  a translator  need  only  write  an  output  module  for  the  target 
language.  We  now  turn  to  the  topic  of  writing  this  output  module.  The  end  result  of 
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the  process  described  will  be  an  object  module  (under  Unix,  a . o file)  which  can  be 
loaded  into  Fed-X.  This  module  contains  a single  entry  point  which  traverses  a given 
Schema  and  writes  its  output  to  a particular  file. 

The  stylistic  convention  taken  in  the  existing  output  modules,  and  which  meshes  most 
cleanly  with  the  design  of  the  Working  Form  data  stmctures,  is  to  define  a procedure 
FOOprint(Foo  foo,  FILE*  file ) corresponding  to  each  Working  Form  ab- 
straction. Thus,  SCHEMAprint  ( Schema  schema,  FILE*  file)  is  the  con- 
ceptual entry  point  to  the  output  module;  an  Algorithm  is  written  by  the  call 
ALGprint  (Algorithm  algorithm,  FILE*  file),  etc.  With  this  break- 
down, most  of  the  actual  output  is  generated  by  the  routines  for  Type,  Entity,  and 
other  concrete  Express  constmcts.  The  routines  for  Schema  and  Scope,  on  the  other 
hand,  control  the  traversal  of  the  data  structures,  and  produce  little  or  no  actual  output 
For  this  reason,  it  is  probably  useful  to  base  new  report  generators  on  existing  ones, 
copying  the  traversal  logic  wholesale  and  modifying  only  the  routines  for  the  concrete 
objects. 

Note  that  the  library  has  default  definitions  of  object  print  routines,  although  they  are 
primarily  for  the  purpose  of  producing  human-readable  descriptions.  These  may  be 
overridden  by  supplying  new  definitions  as  suggested  above.  Note,  however,  that  over- 
riding a built-in  print  routine  may  cause  misbehavior  of  other  built-in  print  routines 
which  depend  on  it. 

4.1  Layout  of  the  C Source 

The  layout  of  the  C source  file  for  a report  generator  which  will  be  dynamically  loaded 
is  of  critical  importance,  due  to  the  primitive  level  at  which  the  load  is  carried  out.  The 
very  first  piece  of  C source  in  the  file  must  be  the  entry_point  ( ) function,  or  the 
loader  may  find  the  wrong  entry  point  to  the  file,  resulting  in  mayhem.  Only  comments 
may  precede  this  function;  even  an  # include  directive  may  throw  off  the  loader. 
An  output  module  is  normally  laid  out  as  shown: 

void 

entrY_point ( void*  schema,  void*  file) 

{ 

extern  void  print_file(); 
print_file ( schema , file) ; 

} 

#include  " express. h" 

. . . actual  output  routines  . , . 


void 

print_f ile ( void*  schema,  void*  file) 

{ 

print_f ile_header ( ( Schema ) schema , 
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(FILE*) file) ; 

SCHEMAprint ( (Schema) schema,  (FILE* ) file) ; 

print_f ile_trailer ( ( Schema ) schema , 

(FILE*) file) ; 

} 

The  pr int_f  i 1 e ( ) function  will  probably  always  be  quite  similar  to  the  one  shown, 
although  in  many  cases,  the  file  header  and/or  trailer  may  well  be  empty,  eliminating 
the  need  for  these  calls.  In  this  case,  SCHEMAprint  ( ) and  print_f  ile  ( ) will 
probably  become  interchangeable. 

Having  said  all  of  the  above  about  templates,  code  layout,  and  so  forth,  we  add  the  fol- 
lowing note:  In  the  final  analysis,  the  output  module  really  is  a free-form  piece  of  C 
code.  There  is  one  and  only  one  rule  which  must  be  followed,  and  this  only  if  the  report 
generator  will  be  dynamically  loaded:  The  entry  point  (according  to  the  a . out  format) 
to  the  . o file  which  is  produced  when  the  report  generator  is  compiled  must  be  appro- 
priate to  be  called  with  a Schema  and  a FILE*.  The  simplest  (and  safest)  way  of  do- 
ing this  is  to  adhere  strictly  to  the  layout  given,  and  write  an  ent  ry_point  ( ) routine 
which  jumps  to  the  real  (conceptual)  entry  point.  But  any  other  mechanism  which  guar- 
antees this  property  may  be  used.  Similarly,  the  layout  of  the  rest  of  the  code  is  purely 
conventional.  There  is  no  a priori  reason  to  write  one  output  routine  per  data  structure, 
or  to  use  the  print_f  ile  ( ) routine  suggested.  This  approach  has  simply  proved  to 
work  nicely  for  current  and  past  report  generators,  and  seems  to  provide  the  shortest 
path  to  a new  output  module.  In  other  words,  if  you  don’t  like  the  authors’  coding 
style(s),  feel  free  to  use  your  own  techniques. 

4.2  Traversing  a Schema 

Following  the  one-routine-per-abstraction  rule,  there  are  two  general  classes  of  output 
routines.  Those  corresponding  to  primitive  Express  constructs  (ENTITYprint  ( ) , 
TYPEprint  ( ) , VARprint  ( ) ) will  produce  most  of  the  actual  output,  while 
SCOPEprint  ( ) (and,  to  a lesser  extent  SCHEMAprint  ( ) ) will  be  responsible  for 
traversing  the  instantiated  working  form.  A typical  definition  for  SCOPEprint  ( ) 
would  be: 

void 

SCOPEprint ( Scope  scope,  FILE*  file) 

{ 

Linked_List  list; 

list  = SCOPEget_types ( scope) ; 

LISTdodist,  type.  Type) 

TYPEprint ( type , file); 

LISTod; 

LISTf ree ( list ) ; 

list  = SCOPEget_entities (scope); 
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.LISTdo ( list , ent,  Entity) 

ENTITYprint ( ent , file) ; 

LISTod; 

LISTf ree (list ) ; 

list  = SCOPEget_algorithins  ( scope)  ; 

LISTdo (list,  alg.  Algorithm) 

ALGprint (alg,  file) ; 

LISTod; 

LISTf ree (list ) ; 

list  = SCOPEget_variables ( scope) ; 

LISTdo (list,  var.  Variable) 

VARprint ( var , file) ; 

LISTod; 

LISTf ree ( list ) ; 

list  = SCOPEget_schemata(scope); 

LISTdo (list,  schema.  Schema) 

SCEMAprint ( schema , file); 

LISTod; 

LISTf ree ( list ) ; 

} 

This  function  traverses  the  model  from  the  outermost  schema  inward.  All  types,  enti- 
ties, algorithms,  and  variables  in  a schema  are  printed  (in  that  order),  followed  by  all 
definitions  for  any  sub-schemas.  The  only  traversal  logic  required  in 
SCHEMAprint  ( ) is  simply  to  call  SCOPEprint  ( ) . 

An  approach  which  is  taken  in  the  Fed-X-QDES  output  module  is  to  divide  the  logical 
functionality  of  SCOPEprint  ( ) into  two  separate  passes,  implemented  by  functions 
SCOPEprint_passl  ( ) and  SC0PEprint_pass2  ( ) . The  first  pass  prints  all  of 
the  entity  definitions,  in  superclass  order  (i.e.,  subclasses  are  not  printed  until  after  their 
superclasses),  without  attributes.  This  is  necessary  because  of  some  difficulties  with 
forward  references  in  Smalltalk-80.  The  second  pass  then  looks  much  like  the  sample 
definition  of  SCOPEprint  ( ) given  above.  This  multi-pass  strategy  could  also  be 
used  to  print,  for  example,  all  of  the  type  and  entity  definitions  in  the  entire  model,  fol- 
lowed by  all  variable  and  algorithm  definitions. 

I 4.3  Working  Form  Routines 

The  remainder  of  this  manual  consists  of  specifications  and  brief  descriptions  of  the  ac- 
I cess  routines  and  associated  error  codes  for  the  Express  Working  Form.  Each  subsec- 

tion below  corresponds  to  a module  in  the  Working  Form  library.  The  Working  Form 
Manager  module  is  listed  first,  followed  by  the  remaining  data  abstractions  in  alphabet- 
I ical  order. 
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The  error  codes  are  manipulated  by  the  Error  module  [Clark90d].  Only  error  codes 
unique  to  each  routine,  are  listed  after  each  description. 

4.4  Working  Form  Manager 

Type:  Express 


Procedure: 

EXPRESSdump_model 

Parameters: 

Returns: 

Description: 

Express  model  - Express  model  to  dump 
void 

Dump  an  Express  model  to  stderr.  This  call  is  provided  for  debugging  purposes. 

Procedure: 

Parameters: 

Returns: 

Description: 

EXPRESSfree 

Express  model  - Express  model  to  free 
void 

Release  an  Express  model.  Indicates  that  the  model  is  no  longer  used  by  the  caller;  if 
there  are  no  o^er  references  to  the  model,  all  storage  associated  with  it  may  be 
released. 

Procedure: 

Parameters: 

Returns: 

Description: 

EXPRES  S initialize 

- none  -- 

void 

Initialize  the  Express  package.  This  call  in  turn  initializes  all  components  of  the 
Working  Form  package.  Normally,  it  is  called  instead  of  calling  all  of  the  individual 
XXXinitialize  ( ) routines.  In  a typical  Express  (or  STEP)  translator,  this 
function  is  called  by  the  default  ma  in  ( ) provid^  in  the  Working  Form  library.  Other 
applications  should  call  it  at  initialization  time. 

Procedure: 

Parameters: 

Returns: 

Description: 

EXPRESSpass.l 

FILE*  file  - Express  source  file  to  parse 

Express  - resulting  Working  Form  model 

Parse  an  Express  source  file  into  the  Working  Form.  No  symbol  resolution  is 
performed 

Procedure: 

Parameters: 

Returns: 

Description: 

EXPRESSpass_2 

Express  model  - Working  Form  model  to  resolve 
void 

Perform  symbol  resolution  on  a loosely-coupled  Working  Form  model  (which  was 
probably  created  by  EXPRESSpass_l  ( ) ). 

Procedure: 

Parameters: 

Returns: 

Description: 

EXPRESSpass_3 

Express  model  - Working  Form  model  to  report 

FILE*  file  - output  file 
void 

Invoke  one  (or  more)  report  generator(s),  according  to  the  selected  linkage 
mechanism. 
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Procedure: 

PASS2initialize 

Parameters: 

Returns: 

Description: 

- none  - 

void 

Initialize  the  Fed-X  second  pass. 

4.5  Algorithm 

Type: 

Supertype: 

Subtypes: 

Algorithm 

Scope 

Function,  Procedure,  Rule 

Procedure: 

Parameters: 

Returns: 

Description: 

ALGget_body 

Algorithm  algorithm  - algorithm  to  examine 

Linked_List  - body  of  algorithm 

Retrieve  the  code  body  of  an  algorithm.  The  elements  of  the  list  returned  are 
Statements. 

Procedure: 

Parameters: 

Returns: 

Description: 

ALGget_name 

Algorithm  algorithm  - algorithm  to  examine 

String  - the  name  of  the  algorithm 

Retrieve  the  name  of  an  algorithm. 

Procedure: 

Parameters: 

Returns: 

Description: 

AI.Gget_parameters 

Algorithm  algorithm  - algorithm  to  examine 

Linked_List  - formal  parameter  list 

Retrieve  the  formal  parameter  list  for  an  algorithm.  When 

ALGget_class  (algorithm)  ==  ALG_RULE,  the  returned  list  contains  the 
Ent  i tys  to  which  the  rule  applies.  Otherwise,  it  contains  Variables  specifying  the 
formal  parameters  to  the  function  or  procedure. 

Procedure: 

Parameters: 

Returns: 

Description: 

ALGinitialize 

— none  -- 

void 

Initialize  the  Algorithm  module.  This  is  called  by  EXPRESS  initialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

ALGprint 

Algorithm 

void 

Prints  an  algorithm.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  alg_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

ALGput_body 

Algorithm  algorithm  - algorithm  to  modify 

Linked_List  statements  - body  of  algorithm 
void 

Set  the  code  body  of  an  algorithm.  The  second  parameter  should  be  a list  of 

Statements. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


ALGput_name 

Algorithm  algorithm  - algorithm  to  modify 
String  name  - new  name  for  algorithm 
void 

Set  the  name  of  an  algorithm. 

ALGput_parameters 

Algorithm  algorithm  - algorithm  to  modify 
Linked_List  list  - formal  parameters  for  this  algorithm 
void 

Set  the  formal  parameter  list  of  an  algorithm.  When 

ALGget_class  (algorithm)  ==  ALG_RULE,  the  formal  parameters  should  be 
the  Ent  itys  to  which  the  rule  apphes.  Otherwise,  they  should  be  Variables. 

ALGresolve 

Algorithm  algorithm  - algorithm  to  resolve 
Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  references  in  an  algorithm  definition.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ( ) . 

FUNCget_retum_type 
Function  function  - function  to  examine 
Type  - function’s  return  type 
Return  the  type  of  the  function. 

FUNCprint 

Function 

void 

Prints  a function.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements 
of  the  variable  func_print. 

FUNCput_retum_type 
Function  function  - function  to  modify 
Type  type  - the  function’s  return  type 
void 

Set  the  return  type  of  a function. 

RULEget_where_clause 
Rule  rule  - rule  to  examine 

Linked_List  - list  of  rule’s  WHERE  clause  constraints 
Return  the  where  clause  of  a rule. 

RULEprint 

Rule 

void 

Prints  a rule.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements  of 
the  variable  rule_print. 
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Procedure: 

RULEput_where_clause 

Parameters: 

Returns: 

Description: 

Rule  rule  - rule  to  modify 

Linked_List  where  - list  of  WHERE  clause  constraints  for  rule 
void 

Set  the  where  clause  of  a rule 

4.6  Case  Item 

Type: 

Supertype: 

Case_ltem 

Construct 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITcreate 

Linked_List  of  Expression  labels  - list  of  case  labels 

Statement  statement  - statement  associated  with  this  branch 

Error*  errc  - buffer  for  error  code 

Case_Item  - the  case  item  created 

Create  a new  case  item.  If  the  ’labels’  parameter  is  LIST_NULL,  acase  item  matching 
in  the  default  case  is  created.  Otherwise,  the  case  item  created  will  match  when  the 
case  selector  has  the  same  value  as  any  of  the  Expressions  on  the  labels  list. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITget_labels 

Case_Item  item  - case  item  to  examine 

Linked_List  - list  of  case  labels 

Retrieve  the  list  of  label  Express  ions  for  which  a case  item  matches.  For  an  item 
which  matches  in  the  default  case,  LIST_NULL  is  returned. 

Procedure: 

Parameters: 

Returns: 

Description: 

C ASE_ITget_statement 

Case_Item  item  - the  case  item  to  examine 

Statement  - statement  associated  with  this  branch 

Retrieve  the  statement  to  be  executed  when  this  case  item  is  matched. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITinitialize 

— none  -- 

void 

Initialize  the  Case  Item  module.  This  is  called  by  EXPRESSinitialize  ( ),andso 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITprint 

Case_ltem 

void 

Prints  a Casejtem.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  case_it_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITresolve 

Case_Item  item  - case  item  to  resolve 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a case  item.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ( ) . 
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4.7  Constant 


Type: 

Constant 

Supertype: 

Symbol 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTcreate 

String  name  - name  of  new  constant 

Type  type  - type  of  new  constant 

Generic  value  - value  for  new  constant 

Constant  - the  constant  created 

Create  a new  constant. 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTget_name 

Constant  constant  - constant  to  examine 

String  - the  name  of  the  constant 

Return  the  name  of  a constant. 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTget_type 

Constant  constant  - constant  to  examine 

Type  - the  type  of  the  constant 

Return  the  type  of  a constant. 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTget_value 

Constant  constant  - constant  to  examine 

Generic  - the  value  of  the  constant 

Return  the  value  of  a constant. 

Procedure: 

CSTinitialize 

Parameters: 

Returns: 

Description: 

— none  -- 

void 

Initialize  the  Constant  module.  This  is  called  by  EXPRESS  initialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTprint 

Constant 

void 

Prints  a Constant.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  cst_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTput_name 

Constant  constant  - constant  to  modify 

String  - name  for  constant 
void 

Set  the  name  of  a constant 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTput_type 

Constant  constant  - constant  to  modify 

Type  - type  for  constant 
void 

Set  the  type  of  a constant 
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Procedure: 

CSTput_value 

Parameters: 

Returns: 

Description: 

Constant  constant  - constant  to  modify 

Generic  - value  of  constant 
void 

Set  the  value  of  a constant 

4.8  Construct 

Type: 

Supertype: 

Construct 

— none  — 

Procedure: 

Parameters: 

Returns: 

Description: 

CONSTRget_line_number 

Construct  construct  - construct  to  examine 
int  - line  number  of  construct 

Return  the  line  number  of  a construct. 

Procedure: 

Parameters: 

Returns: 

Description: 

CONSTRinitialize 

- none  -- 

void 

Initialize  the  Construct  module.  This  is  called  by  EXPRESSinitialize  ( ) ,andso 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

CONSTRprint 

Construct 

void 

Prints  a construct.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  constr_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

CONSTRput_line_number 

Construct  construct  - construct  to  modify 
int  number  - line  number  for  construct 
void 

Set  a construct’s  line  number. 

4.9  Entity 

Type: 

Supertype: 

Entity 

Scope 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  add_attribute 

Entity  entity  - entity  to  modify 

Variable  attribute  - attribute  to  add 
void 

Adds  an  attribute  to  the  entity. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  addjnstance 

Entity  entity  - entity  to  modify 

Generic  instance  - new  instance 
void 

Adds  an  instance  of  the  entity. 
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Procedure: 

Parameters: 

ENTITY  delete_instance 

Entity  entity  - entity  to  modify 

Generic  instance  - instance  to  delete 

Returns: 

Description: 

void 

Deletes  an  instance  of  the  entity. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_abstract 

Entity 

Boolean 

returns  boolean  defining  when  entity  is  abstract  or  not 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_all_attributes 

Entity  entity  - entity  to  examine 

Linked_List  of  Variable  - all  attributes  of  this  entity 

Retrieve  the  complete  attribute  list  of  an  entity.  The  attributes  are  ordered  as  required 
by  the  STEP  Physical  File  format  [Part21].  This  list  should  beLISTfree’d  when  no 
longer  needed. 

Procedure: 

Parameters: 

ENTITY  get_attribute_offset 

Entity  entity  - entity  to  examine 

Variable  attribute  - attribute  to  retrieve  offset  for 

Returns: 

Description: 

int  - offset  to  given  attribute 

Retrieve  offset  to  an  entity  attribute.  This  offset  takes  into  account  all  superclass  of  the 
entity:,  it  is  computed  by  ENTITYget_initial_of  f set  (entity)  + 
VARget_of  f set  (attribute) . If  the  entity  does  not  include  the  attribute,  -1  is 
returned.  This  call  should  be  preferred  over 
ENTITYget_named_attribute_of f set ( ) . 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_attributes 

Entity  entity  - entity  to  examine 

Linked_List  of  Variable  - local  attributes  of  this  entity 

Retrieve  the  local  attribute  list  of  an  entity.  The  local  attributes  of  an  entity  are  those 
which  are  defined  by  the  entity  itself  (rather  than  being  inherited  from  supertypes). 
This  list  should  be  LISTf  ree’d  when  no  longer  needed. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_constraints 

Entity  entity  - entity  to  examine 

Linked_List  of  Expression  - this  entity’s  constraints 

Retrieve  the  list  of  constraints  from  an  entity’s  "where"  clause.  This  list  should  not  be 
LISTf  ree’d. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_initial_offset 

Entity  entity  - entity  to  examine 
int  - number  of  inherited  attributes 

Retrieve  the  initial  offset  to  an  entity’s  local  frame.  This  is  the  total  number  of  explicit 
attributes  inherited  from  supertypes. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_instances 

Entity  entity  - entity  to  examine 

Linked_List  - list  of  instances  of  the  entity 

Retrieve  an  entity’s  instance  list.  This  list  should  not  be  LISTf  ree’d. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


ENTITY  get_m  ark 

Entity  entity  - entity  to  examine 

int  - entity’s  current  mark 

Retrieve  an  entity’s  mark.  See  ENTlTYput_mark  ( ) . 

ENTITY  get_name 
Entity  entity  - entity  to  examine 
String  - entity  name 
Return  the  name  of  an  entity. 

ENTITY  get_nam  ed_attribute 
Entity  entity  - entity  to  examine 
String  name  - name  of  attribute  to  retrieve 
Variable  - the  named  attribute  of  this  entity 

Retrieve  the  definition  of  an  entity  attribute  by  name.  If  the  entity  has  no  attribute  with 
the  given  name,  VARIABLE_NULL  is  returned. 

ENTITY  get_named_attribute_offset 
Entity  entity  - entity  to  examine 

String  name  - name  of  attribute  for  which  to  retrieve  offset 
int  - offset  to  named  attribute  of  this  entity 

Retrieve  the  offset  to  an  entity  attribute  by  name.  If  the  entity  has  no  attribute  with  the 
given  name,  -1  is  returned.  This  call  is  slower  than 

ENTITYget_attribute_of  f set  ( ) , and  SO  should  be  avoided  when  the  actual 
attribute  definition  is  already  available. 

ENTITYget_size 

Entity  entity  - entity  to  examine 

int  - storage  size  of  instantiated  entity 

Compute  the  storage  size  of  an  instantiation  of  this  entity.  This  is  the  total  number  of 
attributes  which  it  contains. 

ENTITY  get_subtype 

Entity 

String 

Entity 

Given  name,  returns  subtype 

ENTITY  get_subtype_expression 
Entity  entity  - entity  to  examine 
Expression  - immediate  subtype  expression 

Retrieve  the  controlling  expression  for  an  entity’s  immediate  subtype  list. 

ENTITY  get_subtypes 

Entity  entity  - entity  to  examine 

Linked_List  of  Entity  - immediate  subtypes  of  this  entity 

Retrieve  a list  of  an  entity’s  immediate  subtypes. 
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Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_supertype 

Entity 

String 

Entity 

Given  name,  returns  supertype 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_supertypes 

Entity  entity  - entity  to  examine 

Linked_List  of  Entity  - immediate  supertypes  of  this  entity 

Retrieve  a list  of  an  entity’s  immediate  supertypes.  This  list  should  not  be 
LISTfree’d. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_uniqueness_list 

Entity  entity  - entity  to  examine 

Linked_List  of  Linked_List  - this  entity’s  uniqueness  sets 

Retrieve  an  entity’s  uniqueness  list.  Each  element  of  this  list  is  itself  a list  of 
Variables,  specifying  a uniqueness  set  for  the  entity.  The  uniqueness  hst  should  not 
be  LISTfree’d,  nor  should  any  of  the  component  lists. 

Procedure: 

Parameters: 

Returns: 

ENTITYhas_immediate_subtype 

Entity  parent  - entity  to  check  children  of 

Entity  child  - child  to  check  for 

Boolean  - is  child  a direct  subtype  of  parent? 

Procedure: 

Parameters: 

Returns: 

ENTITYhas_immediate_supertype 

Entity  child  - entity  to  check  parentage  of 

Entity  parent  - parent  to  check  for 

Boolean  - is  parent  a direct  supertype  of  child? 

Procedure: 

Parameters: 

Returns: 

ENTITYhas_subtype 

Entity  parent  - entity  to  check  descendants  of 

Entity  child  - child  to  check  for 

Boolean  - does  parent’s  subclass  tree  include  child? 

Procedure: 

Parameters: 

Returns: 

ENTITYhas_supertype 

Entity  child  - entity  to  check  parentage  of 

Entity  parent  - parent  to  check  for 

Boolean  - does  child’s  superclass  chain  include  parent? 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  initialize 

- none  -- 

void 

Initialize  the  Entity  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITYprint 

Entity 

void 

Prints  an  Entity.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements 
of  the  variable  entity_print. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


ENTITY  put_abstract 

Entity 

Boolean 

void 

Define  an  entity  to  be  abstract  or  not. 

ENTITYput_constraints 
Entity  entity  - entity  to  modify 

Linked_List  constraints  - list  of  constraints  which  entity  must  satisfy 
void 

Set  the  constraints  on  an  entity.  The  elements  of  the  constraints  list  should  be 
Expressions  of  type  TY_LOGICAL. 

ENTITY  put_inheritance_count 
Entity  entity  - entity  to  modify 
int  count  - number  of  inherited  attributes 
void 

Set  the  number  of  attributes  inherited  by  an  entity.  This  should  be  computed 
automatically  (perhaps  only  when  needed),  and  this  call  removed.  The  count  is 
currently  computed  % ENTITYresolve  ( ) . 

ENTITY  put_mark 
Entity  entity  - entity  to  modify 
int  value  - new  mark  for  entity 
void 

Set  an  entity’s  mark.  This  mark  is  used,  for  example,  in  SCOPE_df  s ( ) , part  of 
SCOPEget_entities_superclass_order  ( ) , to  mark  each  entity  as  having 
been  touched  by  the  traversal. 

ENTITY  put_name 
Entity  entity  - entity  to  modify 
String  name  - entity’s  name 
void 

Set  the  name  of  an  entity. 

ENTITY  put_subtypes 

Entity  entity  - entity  to  modify 

Expression  expression  - controlling  subtype  expression 

void 

Set  the  (immediate)  subtypes  list  of  an  entity. 

ENTITYput_supertypes 
Entity  entity  - entity  to  modify 
Linked_List  list  - superclass  entities 
void 

Set  the  (immediate)  supertype  list  of  an  entity.  The  elements  of  the  list  should  be 
Entitys  or  (unresolved)  Symbols. 
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Procedure: 

ENTITY  put_uniqueness_list 

Parameters: 

Entity  entity  - entity  to  modify 

Linked_List  list  - uniqueness  list 

Returns: 

Description: 

void 

Set  the  uniqueness  list  of  an  entity.  Each  element  of  the  uniqueness  list  should  itself 
be  a list  of  Variables  and/or  (unresolved)  Symbols  referencing  entity  attributes. 
Each  of  these  sublists  specifies  a single  uniqueness  set  for  the  entity. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITYresolve 

Entity  entity  - entity  to  resolve 
void 

Resolve  all  symbol  references  in  an  entity  definition.  This  function  is  called,  in  due 
course,  by  EXPRESSpass_2  ( ) . 

4.10  Expression 

Type:  Expression 


Supertype: 

ConsUTJCt 

Private  Type: 
Supertype: 

Ary_Expression 

Expression 

Type: 

Supertype: 

Binary_Expression 

Ary_Expression 

Type: 

Supertype: 

T emary_Expression 

Ary_Expression 

Type: 

Supertype: 

Unary  _Expression 

Ary_Expression 

Type: 

Supertype: 

One_Of_Expression 

Expression 

Type: 

Supertype: 

Function_Call 

One_Of_Expression 

Type: 

Supertype: 

Identifier 

Expression 

Private  Type: 
Supertype: 

Literal 

Expression 

Type: 

Supertype: 

Aggregate_Literal 

Literal 

Type: 

Supertype: 

Binary_Literal 

Literal 

Type: 

Supertype: 

Integer_Literal 

Literal 
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Type: 

Supertype: 

Logical_LiteraI 

Literal 

Type: 

Supertype: 

Real_Literal 

Literal 

Type: 

Supertype: 

String_Literal 

Literal 

Type: 

Supertype: 

Query 

Expression 

Constant: 

Type: 

LITERAL_E  - a real  literal  with  the  value  2.18281... 

Real_Literal 

Constant: 

Type: 

LITERAL_EMPTY_SET  - a generic  set  literal  representing  the  empty  set 
Aggregate_Literal 

Constant: 

Type: 

LITERAL_INFINITY  - a numeric  literal  representing  infmity 

Integer_Literal 

Constant: 

Type: 

LITERAL_PI  - a real  literal  with  the  value  3.1415... 

Real_Literal 

Constant: 

Type: 

LITERAL_ZERO  - an  integer  hteral  with  the  value  0 

Integer_Literal 

Procedure: 

Parameters: 

AGGR_Lrr  create 

Type  type  - type  of  aggregate  literal  to  be  created 

Linked_List  value  - value  for  literal 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Aggregate_Literal  - the  literal  created 

Create  an  aggregate  literal  expression. 

Procedure: 

Parameters: 

AGGR_LIT  get_value 

Aggregate_Literal  literal  - aggregate  literal  to  examine 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Linked_List  of  Generic  - the  literal’s  contents 

Retrieve  the  value  of  an  aggregate  literal,  as  a Ust. 

Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_LITprint 

Aggregate_Literal 

void 

Prints  an  Aggregate_Literal.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  aggr_ht_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

ARY_EXPget_operand 

Ary_Expression  operand 

Unary  Expression  - the  expression  created 

Create  a unary  operation  expression 
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Procedure: 

Parameters: 

Returns: 

Description: 

ARY_EXPget_operator 

Ary_Expression 

Op_Code 

Return  operator  of  expression 

Procedure: 

Parameters: 

Returns: 

Description: 

ARY_EXPprint 

Ary_Expression 

void 

Prints  an  Ary_Expression.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  ary_exp_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

ARY_EXP*put_operand 

Ary_Expression  - Unary  expression  to  modify 

Expression  - Expression  to  become  new  operand 
void 

Modifies  the  operand  of  a unary  expression 

Procedure: 

Parameters: 

Returns: 

Description: 

BIN_EXPcreate 

Op_Code  op  - operation 

Expression  operand  1 - first  operand 

Expression  operand2  - second  operand 

Error*  errc  - buffer  for  error  code 

Binary_Expression  - the  expression  created 

Create  a binary  operation  expression. 

Procedure: 

Parameters: 

Returns: 

Description: 

B IN_EXPget_first_operand 

Binary_Expression  expression  - expression  to  examine 

Expression  - the  first  (left-hand)  operand  of  the  expression 

Return  first  operand  of  binary  expression. 

Procedure: 

Parameters: 

Returns: 

Description: 

BIN_EXPget_operator 

Binary_Expression  expression  - expression  to  examine 

Op_Code  - the  operator  invoked  by  the  expression 

Return  operator  of  binary  expression. 

Procedure: 

Parameters: 

Returns: 

Description: 

BIN_EXPget_second_operand 

Binary_Expression  expression  - expression  to  examine 

Expression  - the  second  (right-hand)  operand  of  the  expression 

Return  second  operand  of  binary  expression. 

Procedure: 

Parameters: 

Returns: 

Description: 

BIN_EXPprint 

Bin_Expression 

void 

Prints  an  Bin_Expression.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  bin_exp_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

BIN_LITcreate 

Binary 

Error  * 

Binary_Literal 

Creates  a binary  literal 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


BIN_LITget_value 
Binary_Literal 
Error  * 

Binary 

Returns  the  binary  corresponding  to  the  binary_literal 

BE^_LITprint 

Binary_Literal 

void 

Prints  an  Binary_Literal.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  bin_lit_print. 

EXPas_string 

Expression  expression  - expression  to  print  as  string 
String  - string  representation  of  expression 

Generate  the  string  representation  of  an  expression.  Only  (qualified)  identifiers  are 
currently  supported. 

EXPget_integer_value 

Expression  expression  - expression  to  evaluate 
Error*  errc  - buffer  for  error  code 
int  - value  of  expression 

Compute  the  value  of  an  integer  expression.  Currently,  only  integer  literals  can  be 
evaluated;  other  classes  of  expressions  evaluate  to  0 and  produce  a warning  message. 
EXPRESS  I ON_NULL  evaluates  to  0,  as  well. 
ERROR_integer_expression_expected 

EXPget_type 

Expression  expression  - expression  to  examine 

Type  - the  type  of  the  value  computed  by  the  expression 

EXPinitialize 
--  none  -- 
void 

Initialize  the  Expression  module.  This  is  called  by  EXPRESSinitialize  ( ) , and 
so  normally  need  not  be  called  individually. 

EXPprint 

Expression 

void 

Prints  an  Expression.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  exp_print. 

EXPput_type 

Expression  expression  - expression  to  modify 

Type  type  - the  type  of  result  computed  by  the  expression 

void 

Set  the  type  of  an  expression.  This  call  should  actually  be  unnecessary:  the  type  of  an 
expression  is  derivable  from  its  definition.  While  this  is  currently  true  in  the  case  of 
literals,  there  are  no  rules  in  place  for  deriving  the  type  from,  for  example,  the  return 
type  of  a function  or  an  operator  together  with  its  operands. 
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Procedure: 

Parameters: 

EXPresolve 

Expression  expression  - expression  to  resolve 

Scope  scope  - scope  in  which  to  resolve 

Returns: 

Description: 

void 

Resolve  all  symbol  references  in  an  expression.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ( ) . 

Procedure: 

Parameters: 

EXPresolve_qualification 

Expression  expression  - expression  to  resolve 

Scope  scope  - scope  in  which  to  resolve 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Symbol  - the  symbol  referenced  by  the  expression 

Retrieves  the  symbol  definition  referenced  by  a (possibly  qualified)  identifier. 

Procedure: 

Parameters: 

FCALLcreate 

Algorithm  algorithm  - algorithm  invoked  by  expression 

Linked_List  parameters  - actual  parameters  to  function  call 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Errors: 

Function_Call  - the  function  call  created 

Create  a function  call  expression. 

— none  - 

Procedure: 

Parameters: 

Returns: 

Description: 

FCALLget_algorithm 

Function_Call  expression  - function  call  expresion  to  examine 

Algorithm  - the  algorithm  invoked  by  the  function  call 

Retrieves  the  algorithm  of  the  function  call. 

Procedure: 

Parameters: 

Returns: 

Description: 

FCALLget_parameters 

Function_Call  expression  - function  call  expression  to  examine 

Linked_List  of  Expression  - list  of  actual  parameters 

Retrieve  the  actual  parameter  Expressions  from  a function  call  expression. 

Procedure: 

Parameters: 

Returns: 

Description: 

FCALLprint 

Function_Call 

void 

Prints  a Function_Call.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  fcalLprint. 

Procedure: 

Parameters: 

FCALLput_algorithm 

Function_Call  expression  - function  call  expression  to  modify 

Algorithm  algorithm  - algorithm  invoked  by  expression 

Returns: 

Description: 

void 

Set  the  algorithm  invoked  by  a function  call  expression. 

Procedure: 

Parameters: 

FCALLput_parameters 

Function_Call  expression  - function  call  expression  to  modify 

Linked_List  parameters  - list  of  actual  parameters 

Returns: 

Description: 

void 

Set  the  actual  parameter  list  to  a function  call  expression.  The  elements  of  the 
parameter  list  should  be  Express  ions.  The  types  of  the  actual  parameters  currently 
are  not  verified  against  the  formal  parameter  list  of  the  called  algorithm. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 


IDENTcreate 

Symbol  idem  - identifier  referenced  by  expression 
Error*  errc  - buffer  for  error  code 
Identifier  - the  identifier  expression  created 
Create  a simple  identifier  expression. 

IDENT  get_identifier 

Identifier  expression  - expression  to  examine 
Symbol  - the  identifier  referenced  in  the  expression 

IDENTprint 

Identifier 

void 

Prints  an  Identifier.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  ident_print. 

IDENTput_identifier 

Identifier  expression  - identifier  expression  to  modify 
Symbol  identifier  - the  referent  of  the  identifier 
void 

Set  the  referent  of  an  identifier  expression. 

INT_LITcreate 

Integer  value  - value  for  literal 
Error*  eric  - buffer  for  error  code 
Integer_Literal  - the  literal  created 
Create  an  integer  literal  expression. 

INT_LIT  get_value 

Integer_Literal  literal  - integer  literal  to  examine 
Error*  errc  - buffer  for  error  code 
Integer  - the  literal’s  value 

INT_LITprint 

Integer_Literal 

void 

Prints  an  Integer_Literal.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  int_lit_print. 

LOG_LITcreate 
Logical  value  - value  for  literal 
Error*  errc  - buffer  for  error  code 
Logical_Literal  - the  literal  created 
Create  a logical  Uteral  expression. 

LOG_LITget_value 

Logical_Literal  literal  - logical  literal  to  examine 
Error*  errc  - buffer  for  error  code 
Logical  - the  literal’s  value 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 


Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


LOG_Lrrprint 

Logical_Literal 

void 

Prints  a Logical_Literal.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  log_ht_print. 

ONEOFcreate 

Linked_List  selections  - list  of  selections  for  oneof() 

Error*  eirc  - buffer  for  error  code 
One_Of_Expression  - the  oneof  expression  created 
Create  a oneof()  expression. 

ONEOFget_selections 

One_Of_Expression  expression  - expression  to  examine 
Linked_List  of  Expression  - list  of  selections  for  oneof() 

ONEOFprint 

One_Of_Expression 

void 

Prints  a One_Of_Expression.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  oneof_print 

ONEOFput_selections 

One_Of_Expression  expression  - expression  to  modify 
Linked_List  selections  - list  of  selections  for  oneofQ 
void 

Set  the  list  of  selections  for  a oneofQ  expression. 

opcode_print 

Op_Code 

void 

Despite  the  name,  this  function  returns  a string  describing  the  opcode. 

OPget_number_of_operands 

Op_Code  operation  - the  opcode  to  query 

int  - number  of  operands  required  by  this  operator. 

QUERYcreate 

String  ident  - local  identifier  for  source  elements 

Expression  source  - source  aggregate  to  query 

Expression  discriminant  - discriminating  expression  for  query 

Error*  errc  - buffer  for  error  code 

Query  - the  query  expression  created 

Create  a query  expression. 

QUERY  get_discriminant 

Query  expression  - query  expression  to  examine 

Expression  - the  discriminant  expression 

Retrieves  the  discriminant  expression  from  a query  expression.  The  discriminant 
expresses  the  query  criteria. 
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Procedure: 

Parameters: 

Returns: 

Description: 

QUERY  get_source 

Query  expression  - query  expression  to  examine 

Expression  - the  source  aggregation 

Retrieves  the  expression  which  computes  the  aggregation  against  which  a query  will 
be  apphed. 

Procedure: 

Parameters: 

Returns: 

QUERY  get_variable 

Query  expression  - query  expression  to  examine 

Variable  - the  local  iteration  variable  of  the  query 

Procedure: 

Parameters: 

Returns: 

Description: 

QUERYprint 

Query  Expression 
void 

Prints  a Query  Expression.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  query_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

REAL_LITcreate 

Real  value  - value  for  literal 

Error*  errc  - buffer  for  error  code 

Real_Literal  - the  literal  created 

Create  a real  literal  expression. 

Procedure: 

Parameters: 

Returns: 

REAL_LITget_value 

Real_Literal  literal  - real  literal  to  examine 

Error*  errc  - buffer  for  error  code 

Real  - the  literal’s  value 

Procedure: 

Parameters: 

Returns: 

Description: 

REAL_LITprint 

Real_Literal 

void 

Prints  a Real_Literal.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  real_lit_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

STR_LITcreate 

String  value  - value  for  literal 

Error*  errc  - buffer  for  error  code 

String_Literal  - the  literal  created 

Create  a string  literal  expression. 

Procedure: 

Parameters: 

Returns: 

STR_LITget_value 

String_Literal  literal  - string  literal  to  examine 

Error*  errc  - buffer  for  error  code 

String  - the  literal’s  value 

Procedure: 

Parameters: 

Returns: 

Description: 

STR_LITprint 

String_Literal 

void 

Prints  a String_Literal.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  str_lit_print. 
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Procedure: 

TERN_EXPcreate 

Parameters: 

Op_Code 

Expression 

Expression 

Expression 

Error  * 

Returns: 

Description: 

Temary_Expression 

Creates  and  returns  a ternary  expression 

Procedure: 

Parameters: 

Returns: 

Description: 

TERN_EXPget_second_operand 

Temary_Expression 

Expression 

Returns  second  operand  of  a ternary  expression 

Procedure: 

Parameters: 

Returns: 

Description: 

TERN_EXPget_third_operand 

Temary_Expression 

Expression 

Returns  third  operand  of  a ternary  expression 

Procedure: 

Parameters: 

Returns: 

Description: 

TERN_EXPprint 

Ternary  _Expression 
void 

Prints  a Temary_Expression.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  tem_exp_print. 

Procedure: 

Parameters: 

UN_EXPcreate 

Op_Code  op  - operation 

Expression  operand  - operand 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Unary_Expression  - the  expression  created 

Create  a unary  operation  expression. 

Procedure: 

Parameters: 

Returns: 

UN_EXPget_operand 

Unary_Expression  expression  - expression  to  examine 

Expression  - the  operand  of  the  expression 

Procedure: 

Parameters: 

Returns: 

UN_EXPget_operator 

Unary _Expression  expression  - expression  to  examine 

Op_Code  - the  operator  invoked  by  the  expression 

4.11  Loop  Control 

Type:  Loop_Control 


Supertype: 

Construct 

Type: 

Supertype: 

Increment_Control 

Loop_Control 

Private  Type: 
Supertype: 

Condi  tional_Control 

Loop_Control 

Page  29 


Type: 

Supertype: 

Until_Control 

Condi  tionaI_Control 

Type: 

Supertype: 

While_Control 

Conditional_Control 

Procedure: 

Parameters: 

INCR_CTLcreate 

Expression  control  - controlling  expression 

Expression  start  - initial  value 

Expression  end  - terminal  value 

Expression  increment  - amount  by  which  to  increment 

Error*  errc  - buffer  for  error  code 

Returns: 

Increment_Control  - the  loop  control  created 

Procedure: 

Parameters: 

Returns: 

Description: 

INCR_CTLprint 

Increment_Control 

void 

Prints  an  Increment_Control.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  incr_ctl_print. 

Procedure: 

Parameters: 

UNTILcreate 

Expression  control  - termination  condition 

Error*  errc  - buffer  for  error  code 

Returns: 

Requires: 

Errors: 

Until  - the  loop  control  created 

OBJis_kind_of(EXPget_type(control),  Class_Logical_Type) 
ERROR_control_boolean_expected  - controlling  expression  is  not  logical 

Procedure: 

Parameters: 

WHILEcreate 

Expression  control  - continuation  condition 

Error*  errc  - buffer  for  error  code 

Returns: 

Requires: 

Errors: 

While  - the  loop  control  created 

OBJis_kind_of(EXPget_type(control),  Class_Logical_Type) 
ERROR_control_boolean_expected  - controlling  expression  is  not  logical 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOP_CTLget_controlling_expression 

Loop_Control  control  - loop  control  to  examine 

Expression  - controlling  expression 

Retrieve  a loop  control’s  controlling  expression.  For  while  and  until  controls,  this  is 
the  termination  or  continuation  condition,  respectively.  For  iteration  and  set  scan 
controls,  this  is  the  expression  which  receives  successive  values  in  the  iteration. 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOP_CTLprint 

Loop_Control 

void 

Prints  a Loop_Control.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  loop_ctl_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

INCR_CTLget_fmal 

Increment_Control  control  - increment  control  to  examine 

Expression  - terminal  value  for  controlling  expression 

Retrieve  the  final  value  from  an  increment  control. 
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Procedure: 

INCR_CTLget_increment 

Parameters: 

Returns: 

Description: 

Increment_Control  control  - increment  control  to  examine 

Expression  - amount  to  increment  by  on  each  iteration 

Retrieve  the  increment  expression  from  an  increment  control. 

Procedure: 

Parameters: 

Returns: 

Description: 

INCR_CTLget_start 

Increment_Control  control  - increment  control  to  examine 

Expression  - initial  expression  for  controlling  expression 

Retrieve  the  initial  value  from  an  increment  control. 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOP_CTLinitialize 
— none  -- 

void 

Initialize  the  Loop  Control  module.  This  is  called  by  EXPRESSinitialize  ( ) ,and 
so  normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOP_CTLresolve 

Loop_Control  control  - control  to  resolve 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a loop  control.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ( ). 

4.12  Reference 

Procedure: 

Parameters: 

Returns: 

Description: 

REFERENCEresolve 

Scope 

void 

resolves  all  references  in  a scope. 

4.13  Schema 

Type: 

Supertype: 

Schema 

Scope 

Type: 

Supertype: 

Schemas 

Dictionary 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAcreate 

String  name  - name  of  schema  to  create 

Scope  scope  - local  scope  for  schema 

Error*  errc  - buffer  for  error  code 

Schema  - the  schema  created 

Create  a new  schema. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAdump 

Schema  schema  - schema  to  dump 

FILE*  file  - file  to  dump  to 
void 

Dump  a schema  to  a file.  This  function  is  provided  for  debugging  purposes. 
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Procedure: 

SCHEMAget_name 

Parameters: 

Returns: 

Schema  schema  - schema  to  examine 

String  - the  schema’s  name 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAinitialize 

— none  - 

void 

Initialize  the  Schema  module.  This  is  called  byEXPRESSinitializeO,  and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAresolve 

Schema  schema  - schema  to  resolve 

Schemas  schemas  - all  schemas  in  the  Express  file 
void 

Resolve  all  symbol  references  within  a schema.  In  order  to  avoid  problems  due  to 
references  to  as-yet-unresolved  symbols,  schema  resolution  is  broken  into  two  passes, 
which  are  implemented  by  SCHEMAresolve_passl  { ) and 
SCHEMAresolve_pass2  ( ) . These  two  are  called  in  turn  by 

SCHEMAresolve ( ) . 

4.14  Scope 

Type: 

Supertype: 

Scope 

Symbol 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEadd_reference 

Scope 

Linked_List 

void 

Adds  a list  of  references  (from  one  REFERENCE  statement)  to  an  entity. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEadd_use 

Scope 

Linked_List 

void 

Adds  a list  of  references  (from  one  USE  statement)  to  an  entity. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEadd_superscope 

Scope  scope  - scope  to  modify 

Scope  parent  - additional  parent  scope 
void 

Adds  an  immediate  parent  to  a scope. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEcreate 

Scope  scope  - next  higher  scope 

Scope  - the  scope  created 

Create  an  empty  scope.  Note  that  the  connection  between  this  new  scope  and  its  parent 
(the  sole  parameter  to  this  call)  is  uni-directional:  the  parent  does  not  immediately 
know  about  the  child. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

SCOPEdefme_symbol 

Scope  scope  - scope  in  which  to  define  symbol 

Symbol  symdef  - new  symbol  definition 

Error*  errc  - buffer  for  error  code 
void 

Define  a symbol  in  a scope. 

Reports  all  errors  directly,  so  only  ERROR_subordinate_f  ailed  is  propagated. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEdump 

Scope  scope  - scope  to  dump 

FILE*  file  - file  stream  to  dump  to 
void 

Dump  a schema  to  a file.  This  function  is  provided  for  debugging  purposes. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEget_algorithms 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  algorithms 

Retrieve  a list  of  the  algorithms  defined  locally  in  a scope.  The  elements  of  this  list  are 
Algorithms.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEget_constants 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  constants 

Retrieve  a list  of  the  constants  defined  locally  in  a scope.  The  elements  of  this  list  are 
Constants.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEget_entities 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  entities 

Retrieve  a list  of  the  entities  defined  locally  in  a scope.  The  elements  of  this  list  are 
Entitys.  The  list  should  be  LISTf  ree’d  when  no  longer  needed.  This  function  is 
considerably  faster  than  SCOPEget_entities_superclass_order  ( ) , and 
should  be  used  whenever  the  order  of  the  entities  on  the  list  is  not  important. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEget_entities_superclass_order 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  entities  in  superclass  order 

Retrieve  a list  of  the  entities  defined  locally  in  a scope.  The  elements  of  this  list  are 
Entitys.  The  list  should  be  LISTf  ree’d  when  no  longer  needed.  The  list  returned 
is  ordered  such  that  each  entity  appears  before  all  of  its  subtypes. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEget_imports 

Scope  scope  - scope  to  examine 

Linked_List  - ’assumed’  schemata 

Retrieve  a list  of  the  schemata  assumed  in  a scope.  The  elements  of  this  list  are 
Schemas.  The  list  should  not  be  LISTf  ree’d. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEget_references 

Scope 

Dictionary 

All  the  references  (from  all  the  REFERENCE  statements)  of  an  entity. 

Page  33 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 


Returns: 

Description: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Description: 


SCOPEget_resolved 

Scope  scope  - scope  to  examine 

Boolean  - has  this  scope  been  resolved? 

Check  whether  symbol  references  in  a scope  have  been  resolved. 

SCOPEget_superscopes 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  next  outer  (containing)  scopes 

Retrieve  a list  of  a scope’s  parent  scope. 

SCOPEget_types 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  types 

Retrieve  a list  of  the  types  defined  locally  in  a scope.  The  elements  of  this  list  are 
Types.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEget_uses 

Scope 

Linked_List 

Returns  a list  of  all  references  (from  USE  statements)  from  an  entity. 

SCOPEget_variables 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  variables 

Retrieve  a list  of  the  variables  defined  locally  in  a scope.  The  elements  of  this  list  are 
Variables.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEinitialize 
“ none  - 
void 

Initialize  the  Scope  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

SCOPElookup 

Scope  scope  - scope  in  which  to  look  up  name 

String  name  - name  to  look  up 

Boolean  walk  - look  in  parent  and  imported  scopes? 

Error*  errc  - buffer  for  error  code 
Symbol  - definition  of  name  in  scope 

Retrieve  a name’s  definition  in  a scope.  If  the  scope  does  not  define  the  name,  the 
parent  scopes  are  successively  queri^.  If  no  definition  is  found,  SYMBOL_NULL  is 
returned. 

ERROR_undef  ined_identif  ier  - no  definition  was  found 

SCOPEprint 

Scope 

void 

Prints  a Scope.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements 
of  the  variable  scope_print. 
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Procedure: 

SCOPEput_resolved 

Parameters: 

Returns: 

Description: 

Scope  scope  - scope  to  modify 
void 

Set  the  ’resolved’  flag  for  a scope.  This  normally  should  only  be  called  by 
SCOPEresolve  ( ) , which  actually  resolves  the  scope. 

Procedure: 

Parameters: 

SCOPEresolve 

Scope  scope  - scope  to  resolve 

Schemas  schemas  - all  conceptual  schemas  in  the  express  file 

Returns: 

Description: 

void 

Resolve  all  symbol  references  in  a scope.  In  order  to  avoid  problems  due  to  references 
to  as-yet-unresolved  symbols,  scope  resolution  is  broken  into  two  passes,  which  are 
implemented  by  SCOPEresolve_passl  ( ) and  SCOPEresolve_pass2  ( ) . 
These  two  are  called  in  turn  by  SCOPEresolve  ( ) . 

4.15  Statement 


Private  Type: 

Statement 

Supertype: 

Construct 

Type: 

Supertype: 

Assignment 

Statement 

Type: 

Supertype: 

Compound_Statement 

Statement 

Type: 

Supertype: 

Conditional 

Statement 

Type: 

Supertype: 

Loop 

Statement 

Type: 

Supertype: 

Procedure_Call 

Statement 

Type: 

Supertype: 

Retum_Statement 

Statement 

Type: 

Supertype: 

With_Statement 

Statement 

Procedure: 

Parameters: 

ASSIGNcreate 

Expression  Ihs  - the  left-hand-side  of  the  assignment 

Expression  rhs  - the  right-hand-side  of  the  assignment 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Assignment  - the  assignment  statement  created 

Create  an  assignment  statement. 

Page  35 


Procedure: 

Parameters: 

Returns: 

Description: 

ASSIGNgetJhs 

Assignment  statement  - statement  to  examine 

Expression  - left-hand-side  of  assignment  statement 

Return  left-hand-side  of  the  assignment  statement. 

Procedure: 

Parameters: 

Returns: 

Description: 

ASSIGNget_rhs 

Assignment  statement ; statement  to  examine 

Expression  - right-hand-side  of  assignment  statement 

Return  right-hand-side  of  the  assignment  statement. 

Procedure: 

Parameters: 

Returns: 

Description: 

ASSIGNprint 

Assignment  statement 
void 

Prints  an  assignment  statement.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  assign_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASEcreate 

Expression  selector  - expression  to  case  on 

Linked_List  case  - bst  of  case  branches 

Error*  errc  - buffer  for  error  code 

Case_Statement  - the  case  statement  created 

Create  a case  statement.  The  elements  of  the  case  branch  list  should  be  Cas  e_l  t ems. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASEget_items 

Case_Statement  statement  - statement  to  examine 

Linked_List  - case  branches 

Retrieve  a list  of  the  branches  in  a case  statement.  The  elements  of  this  list  are 
Case_Items. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASEget_selector 

Case_Statement  statement  - statement  to  examine 

Expression  - the  selector  for  the  case  statment 

Retrieve  the  selector  from  a case  statement.  This  is  the  expression  whose  value  is 
compared  to  each  case  label  in  turn. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASEprint 

Case_Statement 

void 

Prints  a case  statement.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  case_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

COMP_STMTcreate 

Linked_List  statements  - list  of  compound  statement  elements 

Error*  errc  - buffer  for  error  code 

Compound_Statement  - the  compound  statement  created 

Create  a compound  statement.  The  elements  of  the  statements  list  should  be 
Statements,  in  the  order  they  appear  in  the  compound  statement  to  be  represented. 

Procedure: 

Parameters: 

Returns: 

Description: 

COMP_STMT  get_item  s 

Compound_Statement  statement  - statement  to  examine 

Linked_List  - list  of  statements  in  compound 

Retrieve  a list  of  the  Statements  comprising  a compound  statement. 
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Procedure: 

Parameters: 

Returns: 

Description: 

COMP_STMTprint 

Compound_S  tatem  ent 
void 

Prints  a compound  statement.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  comp_stmt_print. 

Procedure: 

Parameters: 

CONDcreate 

Expression  test  - the  condition  for  the  if 

Statement  then  - code  executed  when  test  ==  true 

Statement  otherwise  - code  executed  when  test  = false 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Conditional  - the  if  statement  created 

Create  an  if  statement.  For  a simple  if  . . then  . . with  no  else  clause,  set  the 
third  parameter  to  STATEMENT_NULL. 

Procedure: 

Parameters: 

Returns: 

CONDget_else_clause 

Conditional  statement  - statement  to  examine 

Statement  - code  for  ’else’  branch 

Procedure: 

Parameters: 

Returns: 

CONDget_condition 

Conditional  statement  - statement  to  examine 

Expression  - the  test  condition 

Procedure: 

Parameters: 

Returns: 

CONDget_then_clause 

Conditional  statement  - statement  to  examine 

Statement  - code  for  ’then’  branch 

Procedure: 

Parameters: 

Returns: 

Description: 

CONDprint 

Conditional  statement 
void 

Prints  a conditional  statement.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  cond_print. 

Procedure: 

Parameters: 

LOOPcreate 

Linked_List  controls  - list  of  controls  for  the  loop 

Statement  body  - statement  to  be  repeated 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Loop  - the  loop  statement  created 

Create  a loop  statement.  The  elements  of  the  controls  list  should  be 
Loop_Controls. 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOPget_body 

Loop  statement  - statement  to  examine 

Statement  - the  body  of  the  loop 

Retrieve  the  body  (repeated  portion)  of  a loop  statement 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOPget_controls 

Loop  statement  - statement  to  examine 

Linked_List  - list  of  loop  controls 

Retrieve  a list  of  a loop  statement’s  controls.  The  elements  of  this  Ust  are 
Loop_Controls. 
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Procedure: 

Parameters: 

Returns: 

Description: 

LOOPprint 

Loop  statement 
void 

Prints  a loop  statement.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  loop_print. 

Procedure: 

Parameters: 

PCALLcreate 

Procedure  procedure  - procedure  called  by  statement 

Linked_List  parameters  - list  of  actual  parameters 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Procedure_Call  - the  procedure  call  created 

Create  a procedure  call  statement.  The  elements  of  the  actual  parameter  list  should  be 
Express  ions  which  compute  the  values  to  be  passed  to  the  procedure. 

Procedure: 

Parameters: 

Returns: 

Description: 

PCALLget_procedure 

Procedure_Call  statement  - statement  to  examine 

Procedure  - procedure  called  by  this  statement 

Retrieve  the  procedure  called  by  a procedure  call  statement. 

Procedure: 

Parameters: 

Returns: 

Description: 

PCALLget_parameters 

Procedure_Call  statement  - statement  to  examine 

Linked_List  - actual  parameters  to  this  call 

Retrieve  the  actual  parameters  for  a procedure  call  statement.  The  elements  of  this  list 
are  Expressions  which  compute  the  values  to  be  passed  to  the  called  routine. 

Procedure: 

Parameters: 

Returns: 

Description: 

PCALLprint 

Procedure_Call  statement 
void 

Prints  a Procedure_Call  statement.  Exactly  what  is  printed  can  be  controlled  by  setting 
various  elements  of  the  variable  pcall_print. 

Procedure: 

Parameters: 

PCALLput_procedure 

Procedure_Call  statement  - statement  to  modify 

Procedure  procedure  - defmition  of  called  procedure 

Returns: 

Description: 

void 

Set  the  actual  procedure  called  by  a procedure  call  statement.  If  a procedure  stub 
(unresolved  Symbol)  is  present  in  the  statement,  it  is  replaced  such  that  all  references 
remain  valid. 

Procedure: 

Parameters: 

RETcreate 

Expression  expression  - expression  to  compute  return  value 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Retum_Statement  - the  return  statement  created 

Create  a return  statement. 

Procedure: 

Parameters: 

Returns: 

Description: 

RET  get_expression 

Retum_Statement  statement  - statement  to  examine 

Expression  - expression  returned  by  this  statement 

Retrieve  the  expression  whose  value  is  computed  and  returned  by  a return  statement. 
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Procedure: 

RETprint 

Parameters: 

Returns: 

Description: 

Return  statement 
void 

Prints  a Return  statement.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  retum_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

STMTinitialize 

- none  -- 

void 

Initialize  the  Statement  module.  This  is  called  by  EXPRESSinitialize  ( ) ,andso 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

STMTresolve 

Statement  statement  - statement  to  resolve 

Returns: 

Description: 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a statement.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ( ). 

Procedure: 

Parameters: 

WITHcreate 

Expression  expression  - controlling  expression  for  the  with 

Statement  body  - controlled  statement  for  the  with 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

With_Statement  - the  with  statement  created 

Create  a with  statement. 

Procedure: 

Parameters: 

Returns: 

WITHget_body 

With_Statement  statement  - statement  to  examine 

Statement  - statement  forming  the  body  of  the  with  statement 

Procedure: 

Parameters: 

Returns: 

Description: 

WITHget_control 

With_Statement  statement  - statement  to  examine 

Expression  - the  controlling  expression 

Retrieve  the  controlling  expression  from  a with  statement.  This  is  the  expression 
which  will  be  prepended  to  any  expression  which  cannot  otherwise  be  evaluated  in  the 
current  scope. 

4.16  Symbol 

Type: 

Supertype: 

Symbol 
— none  -- 

Procedure: 

Parameters: 

Returns: 

SYMBOLget_line_number 

Symbol  symbol  - symbol  to  examine 
int  - line  number  of  symbol 

Procedure: 

Parameters: 

Returns: 

SYMBOLget_name 

Symbol  symbol  - symbol  to  examine 

String  - name  of  symbol 
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Procedure: 

SYMBOLget_resolved 

Parameters: 

Returns: 

Description: 

Symbol  symbol  - symbol  to  examine 

Boolean  - is  the  symbol  resolved? 

Test  whether  a symbol  has  been  resolved. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLinitialize 

“ none  - 

void 

Initialize  the  Symbol  module.  This  is  called  by  EXPRESSinit  ialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLprint 

Symbol 

void 

Prints  a Symbol.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements 
of  the  variable  symbol_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLput_line_number 

Symbol  symbol  - symbol  to  modify 
int  number  - line  number  for  symbol 
void 

Set  a symbol’s  line  number. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLput_name 

Symbol  symbol  - symbol  to  name 

String  name  - name  of  symbol 
void 

Set  the  name  of  a symbol. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLput_resolved 

Symbol  symbol  - symbol  to  mark  resolved 
void 

Mark  a symbol  as  being  resolved.  This  is  normally  called  by  the  cUent 
XXXput_resolved  ( ) functions,  since  a symbol  cannot  itself  be  resolved. 

4.17  Type 

Private  Type: 
Supertype: 

Type 

Symbol 

Type: 

Supertype: 

Aggregate_Type 

Type 

Type: 

Supertype: 

Array_Type 

Aggregate_Type 

Type: 

Supertype: 

Bag_Type 

Aggregate_Type 

Type: 

Supertype: 

Binary_Type 

Type 
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Type: 

Supertype: 

List_Type 

Aggregate_Type 

Type: 

Supertype: 

Set_Type 

Aggregate_Type 

Private  Type: 
Supertype: 

Composed_Type 

Type 

Type: 

Supertype: 

Entity_Type 

Composed_Type 

Type: 

Supertype: 

Enumeration_Type 

Composed_Type 

Type: 

Supertype: 

Select_Type 

Composed_Type 

Type: 

Supertype: 

Generic_Type 

Type 

Type: 

Supertype: 

Logical_Type 

Type 

Type: 

Supertype: 

Boolean_Type 

Logical_Type 

Type: 

Supertype: 

Number_Type 

Type 

Private  Type: 
Supertype: 

Sized_Type 

Type 

Type: 

Supertype: 

Integer_Type 

Sized_Type 

Type: 

Supertype: 

Real_Type 

Sized_Type 

Type: 

Supertype: 

String_Type 

Sized_Type 

Type: 

Supertype: 

Type_Reference 

Type 

Constant: 

Description: 

TYPE_AGGREGATE 

Type  for  general  aggregate  of  generic. 
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Constant: 

Description: 

TYPE_BINARY 

Binary  type. 

Constant: 

Description: 

TYPE_BOOLEAN 

Boolean  type. 

Constant: 

Description: 

TYPE_GENERIC 

The  type  ’generic.’ 

Constant: 

Description: 

TYPE_INTEGER 

Integer  type  with  default  precision. 

Constant: 

Description: 

TYPE_LOGICAL 

Logical  type. 

Constant: 

Description: 

TYPE_META 

Meta  type  (for  TYPEOF  expressions). 

Constant: 

Description: 

TYPE.NUMBER 

Number  type. 

Constant: 

Description: 

TYPE_REAL 

Real  type  with  default  precision. 

Constant: 

Description: 

TYPE_SET_OF_GENERIC 

Type  for  unconstrained  set  of  generic. 

Constant: 

Description: 

TYPE_STRING 

String  type  with  default  precision  (length). 

Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_TYPEget_optional 

Aggregate_Type  type  - type  to  examine 

Boolean  - are  elements  of  this  aggregate  optional? 

Retrieve  the  ’optional’  flag  from  an  aggregate  type.  This  flag  is  true  if  and  only  if  a 
legal  instantiation  of  the  type  need  not  have  aU  of  its  slots  filled. 

Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_TYPEget_unique 

Aggregate_Type  type  - type  to  examine 

Boolean  - must  elements  of  this  aggregate  be  unique? 

Retrieve  the  ’unique’  flag  from  an  aggregate  type.  This  flag  is  true  if  and  only  if  a legal 
instantiation  of  the  type  may  not  contain  duplicates. 

Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_TYPEget_base_type 

Aggregate_Type  type  - type  to  examine 

Type  - the  base  type  of  the  aggregate  type 

Retrieve  the  base  type  of  an  aggregate.  This  is  the  type  of  each  element  of  an 
instantiation  of  the  type. 
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Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_TYPEget_lower_limit 

Aggregate_Type  type  - type  to  examine 

Expression  - lower  limit  of  the  aggregate  type 

Retrieve  an  aggregate  type’s  lower  bound.  For  an  array  type,  this  is  the  lowest  index; 
for  other  aggregate  types,  it  specifies  the  minimum  number  of  elements  which  the 
aggregate  must  contain. 

Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_TYPEget_upper_limit 

Aggregate_Type  type  - type  to  examine 

Expression  - upper  limit  of  the  aggregate  type 

Retrieve  an  aggregate  type’s  upper  bound.  For  an  array  type,  this  is  the  high  index;  for 
other  aggregate  types,  it  specifies  the  maximum  number  of  elements  which  the 
aggregate  may  contain. 

Procedure: 

Parameters: 

Returns: 

Description: 

AGGR_TYPEprint 

Aggregate_Type 

void 

Prints  an  Aggregate_Type.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  aggr_type_print. 

Procedure: 

Parameters: 

AGGR_TYPEput_optional 

Aggregate_Type  type  - type  to  modify 

Boolean  optional  - are  array  elements  optional? 

Returns: 

Description: 

void 

Set  the  ’optional’  flag  for  an  array  type.  This  flag  indicates  that  all  slots  in  an  instance 
of  the  type  need  not  be  filled. 

Procedure: 

Parameters: 

AGGR_TYPEput_unique 

Aggregate_Type  type  - type  to  modify 

Boolean  unique  - are  aggregate  elements  required  to  be  unique? 

Returns: 

Description: 

void 

Set  the  ’unique’  flag  for  an  aggregate  type.  This  flag  indicates  that  an  instantiation  of 
the  type  may  not  contain  duplicate  items. 

Procedure: 

Parameters: 

AGGR_TYPEput_base_type 

Aggregate_Type  type  - type  to  modify 

Type  base  - the  base  type  for  this  aggregate 

Returns: 

Description: 

void 

Set  the  base  type  of  an  aggregate  type.  This  is  the  type  of  every  element. 

Procedure: 

Parameters: 

AGGR_TYPEput_limits 

Aggregate_Type  type  - type  to  modify 

Expression  lower  - lower  bound  for  aggregate 

Expression  upper  - upper  bound  for  aggregate 

Returns: 

Description: 

void 

Set  the  lower  and  upper  bounds  for  an  aggregate  type.  For  an  array  type,  these  are  the 
low  and  high  indices;  for  other  aggregates,  these  specify  the  minimum  and  maximum 
number  of  elements  which  an  instance  may  contain. 

Procedure: 

Parameters: 

COMP_TYPEadd_items 

Composed_Type 

Linked_List 

Returns: 

Description: 

void 

Add  to  the  list  of  items  for  a Composed_Type. 
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Procedure: 

Parameters: 

Returns: 

Description: 

COMP_TYPEget_item  s 

Composed_Type 

Linked_List  of  Symbol 

Retrieve  a composed  types  list  of  identifiers. 

Procedure: 

Parameters: 

Returns: 

Description: 

COMP_TYPEprint 

Composed_Type 

void 

Prints  a Composed_Type.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  comp_type_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

COMP_TYPEput_items 

Composed_Type 

Linked_List 

void 

Set  the  list  of  items  for  a Composed_Type. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENT_TYPEget_entity 

Entity_Type  type  - type  to  examine 

Entity  - definition  of  entity  type 

Retrieve  the  (first)  entity  referenced  by  an  entity  type. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENT_TYPEget_entity_list 

Entity_Type  type  - type  to  examine 

Linked_List  - definition  of  entity  type 

Retrieve  a list  of  the  entities  referenced  by  an  entity  type. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENT_TYPEput_entity 

Entity _Type  type  - type  to  modify 

Entity  entity  - definition  of  type 
void 

Set  the  entity  referred  to  by  an  entity  type. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENT_TYPEput_entity_list 

Entity_Type  type  - type  to  modify 

Linked_List  - definition  of  type 
void 

Set  the  list  of  entities  referred  to  by  an  entity  type. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENUM_TYPEget_items 

Enumeration_Type  type  - type  to  examine 

Linked_List  - list  of  enumeration  items 

Retrieve  an  enumerated  type’s  list  of  identifiers.  Each  element  of  this  list  is  a 
Constant. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENUM_TYPEput_items 

Enumeration_Type  type  - type  to  modify 

Linked_List  list  - list  of  enumeration  items 
void 

Set  the  list  of  identifiers  for  an  enumerated  type.  Each  element  of  this  list  should  be  a 

Constant. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


SEL_TYPEget_items 

Select_Type  type  - type  to  examine 

Linked_List  - list  of  selectable  types 

Retrieve  a list  of  the  selectable  types  from  a select  type. 

SEL_TYPEput_items 
Select_Type  type  - type  to  modify 
Linked_List  list  - list  of  selectable  types 
void 

Set  the  list  of  selections  for  a select  type.  An  instance  of  any  these  types  is  a legal 
instantiation  of  the  select  type.  Each  Type  on  the  list  should  be  of  class 
TYPE_ENTITY  or  TYPE_SELECT. 

SZD_TYPEget_precision 

Sized_Type  type  - type  to  examine 

Expression  - the  precision  specification  of  the  type 

Retrieve  the  precision  specification  from  certain  types.  This  specifies  the  maximum 
number  of  significant  digits  or  characters  in  an  instance  of  the  type. 

SZD_TYPEget_varying 

Sized_Type  type  - type  to  examine 

Boolean  - is  the  string  type  of  varying  length? 

Retrieve  the  ’varying’  flag  from  a string  type.  This  flag  is  true  if  and  only  if  the  length 
of  an  instance  may  vary,  up  to  the  type’s  precision.  It  is  true  by  default. 

SZD_TYPEprint 

Sized_Type 

void 

Prints  a Sized_Type.  Exactly  what  is  printed  can  be  controlled  by  setting  various 
elements  of  the  variable  szd_type_print. 

SZD_TYPEput_precision 
Sized_Type  type  - type  to  modify 
Expression  prec  - the  precision  of  the  type 
void 

Set  the  precision  of  certain  types.  This  is  the  maximum  number  of  significant  digits  or 
characters  in  an  instance. 

SZD_TYPEput_varying 

Sized_Type  type  - type  to  modify 

Boolean  varying  - is  string  type  of  varying  length? 

void 

Set  the  ’varying’  flag  of  a string  type.  This  flag  indicates  that  the  length  of  an  instance 
may  vary,  up  to  the  type’s  precision.  The  default  behavior  for  a string  type  is  to  be 
varying,  i.e.,  strings  are  initialized  as  if  TYPEput_varying(string,  true)  were  called. 

TYPEcompatible 

Type  lhs_type  - type  for  left-hand-side  of  assignment 
Type  rhs_type  - type  for  right-hand-side  of  assignment 
Boolean  - are  the  types  assignment  compatible? 

Determine  whether  two  types  are  assignment-compatible.  It  must  be  possible  to  assign 
a value  of  rhs_type  into  a slot  of  lhs_tYpe. 
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Procedure: 

Parameters: 

Returns: 

Description: 

TYPEget_name 

Type  type  - type  to  examine 

String  - the  name  of  the  type 

Return  the  name  of  the  type. 

Procedure: 

Parameters: 

Returns: 

Description: 

TY  PEget_original_type 

Type  type 

Type 

returns  the  original  type,  allowing  a way  to  see  through  TYPE  declarations. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEget_size 

Type  type  - type  to  examine 
int  - logical  size  of  a type  instance 

Compute  the  size  of  an  instance  of  some  type.  Simple  types  all  have  size  1,  as  does  a 
select  type.  The  size  of  an  aggregate  type  is  the  maximum  number  of  elements  an 
instance  can  contain;  and  the  size  of  an  entity  type  is  its  total  attribute  count.  If  an 
aggregate  type  is  unbounded,  the  constant  TYPE_UNBOUNDED_SlZE  is  returned. 
TTiis  value  may  be  ambiguous;  the  upper  bound  of  the  type  should  be  relied  on  to 
determined  unboundedness.  It  is  intended  that  the  initial  memory  allocation  for  such 
an  aggregate  should  give  space  for  TYPE_UNBOUNDED_S  I ZE  elements,  and  that  this 
should  grow  as  needed.  By  returning  some  reasonable  initial  size,  this  call  allows  its 
return  value  to  be  used  immediately  as  a parameter  to  a memory  allocator,  without 
being  checked  for  validity.  This  is  the  approach  taken  in  the  STEP  Working  Form 
[Clark90d],  [Clark90e]. 

Procedure: 

Parameters: 

Returns: 

Description: 

TY  PEget_where_clause 

Type  type  - type  to  examine 

Linked_List  - the  type’s  WHERE  clause 

Retrieve  the  WHERE  clause  associated  with  a type.  Each  element  of  the  returned  list 
will  be  an  Expression  which  computes  a Logical  result. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEinitialize 

— none  -- 

void 

Initialize  the  Type  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEprint 

Type 

void 

Prints  a Type.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements  of 
the  variable  type_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEput_name 

Type  type  - type  to  modify 

String  name  - new  name  for  type 
void 

Set  the  name  of  a type. 
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Procedure: 

TY  PEput_original_type 

Parameters: 

Returns: 

Description: 

TYPE  new_type 

TYPE  original_type 
void 

Sets  original  type.  See  TYPEget_original_type. 

Procedure: 

Parameters: 

Returns: 

Description: 

TY  PEput_where_clause 

Type  type  - type  to  modify 

Linked_List  - the  type’s  WHERE  clause 
void 

Set  the  WHERE  clause  associated  with  a type.  Each  element  of  the  list  should  be  an 
Expression  which  computes  a Logical  result. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEresolve 

Type  type  - type  to  resolve 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  references  in  a type  definition,  and  transform  a type  reference  into  the 
appropriate  Type  or  Entity  construct.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ( ) . 

Procedure: 

Parameters: 

Returns: 

Description: 

TY  PE_REFget_full_name 

Type_Reference  type  - type  reference  to  examine 

Expression  - [qualified]  identifier  expression  for  type  reference 

Retrieve  the  identifier  expression  for  a type  reference.  This  expression  consists  of 
identifier  components  assembled  into  binary  expressions  with  OP_DOT. 

Procedure: 

Parameters: 

Returns: 

Description: 

TY  PE_REFprint 

Type_Reference 

void 

Prints  a Type_Reference.  Exactly  what  is  printed  can  be.  controlled  by  setting  various 
elements  of  the  variable  type_ref_print. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPE_REFput_full_name 

Type_Reference  type  - type  reference  to  modify 

Expression  name  - [qualified]  identifier  expression  for  type  reference 
void 

Set  the  identifier  expression  for  a type  reference. 

4.18  Use 

Procedure: 

Parameters: 

Returns: 

Description: 

USEresolve 

Scope 

void 

resolves  all  references  (from  USE  statements)  in  a scope. 

4.19  Variable 

Type: 

Supertype: 

Variable 

Symbol 
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Procedure: 

Parameters: 

VARcreate 

String  name  - name  of  variable  to  create 

Type  type  - type  of  variable  to  create 

Error*  eric  - buffer  for  error  code 

Returns: 

Description: 

Variable  - the  Variable  created 

Create  a new  variable.  The  reference  class  of  the  variable  is,  by  default, 
REF_DYNAMIC.  All  special  flags  associated  with  the  variable  (e.g.,  optional)  are 
initially  false. 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_derived 

Variable  var  - variable  to  examine 

Boolean  - value  of  variable’s  derived  flag 

Retrieve  the  value  of  a variable’s  ’derived’  flag.  This  flag  indicates  that  an  entity 
attribute’s  value  should  always  be  computed  by  its  initializer;  no  value  will  ever  be 
specified  for  it. 

Procedure: 

Parameters: 

Returns: 

Description: 

V ARget_initializer 

Variable  var  - variable  to  modify 

Expression  - variable  initializer 

Retrieve  the  expression  used  to  initialize  a variable. 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_in  verse 

Variable 

Symbol 

Returns  inverse  relationship  of  a variable.  Typically  used  after  resolution,  this  will  be 
either  a Set_Type  or  an  Identifier  of  the  entity  of  the  variable. 

Procedure: 

Parameters: 

Returns: 

VARget_name 

Variable  var  - variable  to  examine 

String  - the  name  of  the  variable 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_offset 

Variable  var  - variable  to  examine 
int  - offset  to  variable  in  local  frame 

Retrieve  the  offset  to  a variable  in  its  local  frame.  This  offset  alone  is  not  sufficient  in 
the  case  of  an  entity  attribute  (see  ENTlTYget_attribute_of  f set  ( ) ). 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_optional 

Variable  var  - variable  to  examine 

Boolean  - value  of  variable’s  optional  flag 

Retrieve  the  value  of  a variable’s  ’optional’  flag.  This  flag  indicates  that  a particular 
entity  attribute  need  not  have  a value  when  the  entity  is  instantiated. 

Procedure: 

Parameters: 

Returns: 

VARget_type 

Variable  var  - variable  to  examine 

Type  - the  type  of  the  variable 

Procedure: 

Parameters: 

Returns: 

Description: 

V ARget_variable 

Variable  var  - variable  to  examine 

Boolean  - value  of  variable’s  variable  flag 

Retrieve  the  value  of  a variable’s  ’variable’  flag.  This  flag  indicates  that  an  algorithm 
parameter  is  to  be  passed  by  reference,  so  that  it  can  be  modified  by  the  callee. 
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Procedure: 

Parameters: 

Returns: 

Description: 

VARinitialize 

- none  -- 

void 

Initialize  the  Variable  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

VARprint 

Variable 

void 

Prints  a Variable.  Exactly  what  is  printed  can  be  controlled  by  setting  various  elements 
of  the  variable  var_print. 

Procedure: 

Parameters: 

VARput_derived 

Variable  var  - variable  to  modify 

Boolean  val  - new  value  for  derived  flag 

Returns: 

Description: 

void 

Set  the  value  of  the  ’derived’  flag  for  a variable.  This  flag  is  currently  redundant,  as  a 
derived  attribute  can  be  identified  by  the  fact  that  it  has  an  initializing  expression.  This 
may  not  always  be  true,  however. 

Procedure: 

Parameters: 

V ARput_initializer 

Variable  var  - variable  to  modify 

Expression  init  - initializer 

Returns: 

Description: 

void 

Set  the  initializing  expression  for  a variable. 

Procedure: 

Parameters: 

VARput_in  verse 

Variable 

Returns: 

Description: 

Symbol 

void 

Set  inverse  relationship  for  a variable.  See  VARget_in verse. 

Procedure: 

Parameters: 

VARput_offset 

Variable  var  - variable  to  modify 

int  offset  - offset  to  variable  in  local  frame 

Returns: 

Description: 

void 

Set  a variable’s  offset  in  its  local  frame.  Note  that  in  the  case  of  an  entity  attribute,  this 
offset  is  from  the  first  locally  defined  attribute,  and  must  be  used  in  conjunction  with 
entity’s  initial  offset  (see  ENTITYget_attribute_of  f set  ( ) ). 

Procedure: 

Parameters: 

VARput_optional 

Variable  var  - variable  to  modify 

Boolean  val  - value  for  optional  flag 

Returns: 

Description: 

void 

Set  the  value  of  the  ’optional’  flag  for  a variable.  This  flag  indicates  that  a particular 
entity  attribute  need  not  have  a value  when  the  entity  is  instantiated.  It  is  initially  false. 

Procedure: 

Parameters: 

VARput_type 

Variable 

Returns: 

Description: 

Type 

void 

Set  the  type  of  a variable. 
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Procedure: 

V ARput_variable 

Parameters: 

Variable  var  - variable  to  modify 

Boolean  val  - new  value  for  variable  flag 

Returns: 

Description: 

void 

Set  the  value  of  the  ’variable’  flag  for  a variable.  This  flag  indicates  that  an  algorithm 
parameter  is  to  be  passed  by  reference,  so  that  it  can  be  modified  by  the  callee. 

Procedure: 

Parameters: 

VARresolve 

Variable  variable  - variable  to  resolve 

Returns: 

Description: 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a variable  definition.  This  is  called,  in  due  course,  by 
EXPRESSpass_2(). 

5 Express  Working  Form  Error  Codes 

The  Error  module,  which  is  used  to  manipulate  these  error  codes,  is  described  in 


[Clark90c]. 

Error: 

Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_baiLout 

Express 

SEVERITY_DUMP 

Fed-X  internal  error 

— none  -- 

Error: 

Defined  In: 

Severity: 

Meaning: 

ERROR_control_boolean_expected 

Loop_Control 

SEVERITY_W  ARMING 

The  controlling  expression  for  a while  or  until  does  not  seem  to  return  boolean.  In  the 
current  implementation,  this  message  can  be  erroneously  produced  because  proper 
types  are  not  derived  for  complex  expressions;  thus,  an  expression  which  truly  does 
compute  a boolean  result  may  not  appear  to  do  so  according  to  the  Working  Form. 

Format: 

- none  -- 

Error: 

Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_corrupted_expression 

Expression 

SEVERITY.DUMP 

Fed-X  internal  error  an  Expression  structure  was  corrupted 
%s  - function  detecting  error 

Error: 

Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_corrupted_statement 

Statement 

SEVERITY_DUMP 

Fed-X  internal  error  a Statement  structure  was  corrupted 
%s  - function  detecting  error 
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Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_corrupted_type 

Type 

SEVERITY_DUMP 

Fed-X  internal  error  a Type  structure  was  corrupted 
%s  - function  detecting  error 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_duplicate_declaration 

Scope 

severity_error 

A symbol  was  redeclared  in  the  same  scope 

%s  - name  of  redeclared  symbol 

%d  - line  number  of  previous  declaration 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_inappropriate_use 

Scope 

SEVERITY_ERROR 

A symbol  was  used  in  a context  which  is  inappropriate  for  its  declaration. 

%s  - the  name  of  the  symbol 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_include_file 

Scanner 

SEVERITY_ERROR 

An  iNCLUDEd  fde  could  not  be  opened. 

%s  - the  name  of  the  fde 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_integer_expression_expected 

Expression 

SEVERITY_WARNING 

A non-integer  expression  was  encountered  in  an  integer-only  context 
— none  - 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_integer_literal_expected 

Expression 

SEVERITY_WARNING 

A non-integer  or  non-literal  was  encountered  in  an  integer-literal  context 
- none  -- 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_logical_literal_expected 

Expression 

SEVERITY_WARNING 

A non-logical  or  non-literal  was  encountered  in  a logical-literal  context 
— none  ~ 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_missing_subtype 

Pass2 

SEVERITY_WARNING 

An  entity  which  lists  a particular  supertype  does  not  appear  in  that  entity’s  subtype  list. 
%s  - the  name  of  the  subtype 
%s  - the  name  of  the  supertype 
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Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 


Error: 
Deflned In: 
Severity: 
Meaning: 
Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 


Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 


Error: 
Deflned In: 
Severity: 
Meaning: 
Format: 


ERROR_missing_supertype 

Pass2 

SEVERITY_ERROR 

An  entity  which  lists  a particular  subtype  does  not  appear  in  that  entity’s  supertype  list. 
%s  - the  name  of  the  supertype 
%s  - the  name  of  the  subtype 

ERROR_nested_com  ment 
Scanner 

SEVERITY_WARNING 

A start  comment  symbol  ( * was  encountered  within  a comment. 

--  none  - 

ERROR_overloaded_attribute 

Pass2 

SEVERITY_ERROR 

An  attribute  name  was  previously  declared  in  a supertype 
%s  - the  attribute  name 

%s  - the  name  of  the  supertype  with  the  previous  declaration 

ERROR_real_literal_expected 

Expression 

SEVERITY_WARNING 

A non-real  or  non-literal  was  encountered  in  a real-literal  context 

— none  - 

ERROR_set_literal_expected 

Expression 

SEVERITY_W  ARMING 

A non-set  or  non-literal  was  encountered  in  a set-literal  context 

— none  - 

ERROR_set_scan_set_expected 

Loop_Control 

SEVERITY_W  ARMING 

The  control  set  for  a set  scan  control  is  not  a set 

— none  - 

ERROR_shadowed_declaration 

Pass2 

SEVERITY_W  ARMING 

A symbol  declaration  shadows  a definition  in  an  outer  (or  assumed)  scope. 

%s  - name  of  redeclared  symbol 

%d  - line  number  of  previous  declaration 

ERROR_string_literal_expected 

Expression 

SEVERITY_W  ARMING 

A non-string  or  non-literal  was  encountered  in  a string-literal  context 

— none  - 
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Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 


Error 
Deflned In: 
Severity: 
Meaning: 

Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 


Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 

Error: 
Deflned  In: 
Severity: 
Meaning: 
Format: 


Error: 
Deflned  In: 
Severity: 
Meaning: 

Format: 


ERROR_syntax 

Express 

SEVERITY_EXIT 

Unrecoverable  syntax  error 

%s  - description  of  error 

%s  - name  of  scope  in  which  error  occurred 

ERROR_undefmed_identifier 

Pass2 

SEVERITY_W  ARMING 

An  identifer  was  referenced  which  has  not  been  declared.  This  error  only  produces  a 
warning  because  Fed-X  does  not  deal  with  all  of  the  scoping  issues  in  algorithms. 

%s  - the  name  of  the  identifier 

ERROR_undefmed_type 

Pass2 

SEVERITY_ERROR 

An  undeclared  identifier  was  used  in  a context  which  requires  a type. 

%s  - the  name  of  the  type 

ERROR_unknown_expression_class 

Expression 

SEVERITY_DUMP 

Fed-X  internal  error 

%d  - the  offending  expression  class 

%s  - the  context  (function)  in  which  the  error  occurred 

ERROR_unknown_schema 

Pass2 

SEVERITY_W  ARMING 
An  unknown  schema  was  ASSUMEd 
%s  - the  assumed  schema  name 

ERROR_unknown_subtype 

Pass2 

SEVERITY_W  ARMING 

An  entity  lists  a subtype  which  is  not  itself  declared  as  an  entity. 

%s  - the  subtype  name 
%s  - the  supertype  name 

ERROR_unknown_supertype 

Pass2 

SEVERITY_EXIT 

An  entity  lists  a supertype  which  is  not  itself  declared  as  an  entity.  Fed-X  is  unable  to 
proceed  in  this  situation. 

%s  - the  supertype  name 
%s  - the  subtype  name 
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Error: 

ERROR_unknown_type_class 

Defined  In: 

Type 

Severity: 

SEVERTTY.DUMP 

Meaning: 

Fed-X  internal  error 

Format: 

%d  - the  offending  type  class 

%s  - the  context  (function)  in  which  the  error  occurred 

Error: 

ERROR_wrong_operand_count 

Defined  In: 

Expression 

Severity: 

SEVERITY_W  ARMING 

Meaning: 

Mismatch  between  actual  and  expected  (on  the  basis  of  code  context)  operand  count 

Format: 

%s  - the  operator 

6 Building  Fed-X 

The  Fed-X  toolkit  is  distributed  in  two  ways.  The  usual  form  is  the  latest  release  of  the 
software.  An  alternate  form  is  the  RCS  archives  [Bodarky91]  which  contain  all  prior 
releases. 

If  you  only  have  the  latest  release  of  the  software,  simply  visit  each  directory  named  src 
and  type  ’make  install’.  This  will  create  the  necessary  libraries.  You  may  skip  the  rest 
of  this  section. 

The  following  discussion  assumes  you  have  the  RCS  archives.  To  buUd  the  toolkit,  you 
must  find  out  where  the  archives  are  and  where  you  would  like  to  build  the  toolkit.  This 
discussion  assumes  that  the  toolkit  archives  are  stored  in  ~pdes  and  you  would  like  to 
build  it  in  -/pdes. 

First  create  the  directory  in  which  you  are  going  to  keep  all  your  files. 

mkdir  ~/pdes 

Check  out  a copy  of  make_rules. 

cd  ~/pdes 
mkdir  include 
cd  include 

CO  ~pdes/include/make_rules 

make_rules  contains  definitions  common  to  all  other  parts  of  Fed-X  as  well  as  ap- 
plications. If  you  examine  it,  you  will  find  ways  to  customize  the  toolkit.  For  example, 
you  can  choose  whether  to  use  yacc  or  bison  by  changing  this  file.  Only  one  change 
will  be  described  in  detail  here.  Namely,  you  must  tell  make_rules  the  directory  in 
which  you  are  keeping  all  your  Fed-X  code. 

In  order  to  make  this  change,  start  by  making  it  writeable: 

chmod  +w  make  rules 
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Change  the  definition  of  PDES  to  reflect  the  root  of  the  directories  where  you  have  your 
Fed-X  code  stored.  Note  that  Make  does  not  understand  the  ~ notation  - thus,  you  must 
provide  the  hardcoded  path,  which  for  this  example  is  assumed  to  be  /home  / f red: 

PDES=/home/ f red/pdes 

Fed-X  will  ultimately  be  stored  in  several  libraries.  A directory  must  be  created  to  con- 
tain the  libraries.  It  is  created  as  follows: 

mkdir  -p  ~/pdes/arch/lib 

If  you  are  using  bison,  you  should  now  create  or  link  the  bison  library  to  this  directory. 
For  example,  to  create  the  library  from  scratch: 

cd  ~/pdes/src/libbison 
CO  Checkout 
Checkout 
make  install 

In  order  to  build  the  libraries,  several  programs  must  exist.  These  live  in  ~pdes  /bin 
and  it  is  normally  sufficient  to  create  a symbolic  link  between  this  and  your  own  bin 
directory  as: 

In  -s  -pdes/bin  ~/pdes/bin 

If  you  already  have  a directory  by  that  name,  you  may  link  the  individual  files: 

In  -s  ~/pdes/bin/*  --/pdes/bin 

Fed-X  is  composed  of  sources  in  two  directories  and  include  files  in  two  other  directo- 
ries. The  following  example  extracts  the  files  from  all  four  directories.  After  mnning 
each  Checkout,  expect  a page  or  so  of  output  as  each  file  composing  the  toolkit  is 
checked  out.  The  command  make  install  compiles  the  toolkit  and  installs  the  li- 
brary version  in  the  arch/ lib  directory  created  previously. 

cd  ~/pdes/include/libmisc 

CO  Checkout 

Checkout 

cd  ~/pdes/src/libmisc 
CO  Checkout 
Checkout 
make  install 

cd  ~/pdes/include/express 

CO  Checkout 

Checkout 

cd  ~/pdes/src/express 
CO  Checkout 
Checkout 
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make  .install 


You  can  now  build  applications  with  Fed-X 

7 Building  Applications  with  Fed-X 

Assuming  the  Fed-X  toolkit  has  been  built  (as  described  in  the  previous  section),  build- 
ing an  application  requires  compiling  and  linking  with  the  toolkit. 

The  easiest  way  to  do  this  is  copy  the  Makefile  and  main.c  from  an  extant  Fed-X  ap- 
plication and  modify  it  as  necessary.  For  example,  f edex  is  a very  simple  program 
that  calls  the  toolkit  to  create  a working  form  and  do  nothing  else.  To  get  f edex,  create 
a directory  for  it  and  check  out  the  code: 

mkdir  ~/pdes/src/f edex 
cd  ~/pdes/src/f edex 
CO  Checkout 
Checkout 

If  you  want  to  compile  f edex  itself,  run  make:. 

cd  ~/pdes/src/ f edex 
make 

Now  you  may  copy  the  Makefile  and  main.c  as  appropriate  for  you  application. 
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